home *** CD-ROM | disk | FTP | other *** search
/ Internet Info 1994 March / Internet Info CD-ROM (Walnut Creek) (March 1994).iso / networking / osi / quipu / quipu-6.8-bugs.complete < prev    next >
Encoding:
Text File  |  1991-07-21  |  65.3 KB  |  2,733 lines
  1. -------------------- Bug No 1 --------------------------
  2. Return-Path: <c.robbins@uk.co.xtel>
  3. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  4.           id <02521-0@lancaster.xtel.co.uk>; Tue, 12 Mar 1991 13:23:36 +0000
  5. To: quipu-bugs@xtel.co.uk
  6. Subject: Watchdogs
  7. Date: Tue, 12 Mar 91 13:24:08 +0000
  8. From: Colin Robbins <c.robbins@xtel.co.uk>
  9.  
  10. QUIPU VERSION:    6.8
  11.  
  12. ISODE VERSION:    6.8
  13.  
  14. MACHINE:    Sun 4/330 (X-TEL config)
  15.  
  16. O/S:        SunOS 4.1
  17.  
  18. PROGRAM/CHANNEL: 
  19.         ros.quipu
  20.  
  21. SYNOPSIS:    Watchdog activated 
  22.  
  23. DESCRIPTION:    A DSA from time to time logs "Watchdog activated" in
  24.         dsap.log file, and the restarts itself
  25.  
  26. REPEAT BY:    -
  27.  
  28. SAMPLE FIX:    This may fix it, time will tell...
  29.  
  30. *** ../../isode-master/tsap/tp0ts.c    Sun May 12 17:36:52 1991
  31. --- ./tp0ts.c    Wed May 22 14:08:55 1991
  32. ***************
  33. *** 527,532 ****
  34. --- 524,541 ----
  35.       tx -> tx_qbuf.qb_forw = tx -> tx_qbuf.qb_back = &tx -> tx_qbuf;
  36.   
  37.       for (;;) {
  38. +     if (oob) { /* out of band data should not be present! */
  39. +         (void) tsaplose (td, t ? t -> t_errno : DR_CONGEST, NULLCP,
  40. +                      "Out of band data received");
  41. + #ifdef  X25
  42. +             if (tb -> tb_flags & TB_X25)
  43. +                 LLOG (x25_log, LLOG_NOTICE,
  44. +                       ("out of band data on %d, %d/%d octets sent/recv",
  45. +                        tb -> tb_fd, tb -> tb_sent, tb -> tb_recv));
  46. + #endif
  47. +             break;
  48. +     }
  49. + 
  50.       if ((t = fd2tpkt (tb -> tb_fd, tb -> tb_initfnx, tb -> tb_readfnx))
  51.               == NULL
  52.           || t -> t_errno != OK) {
  53.  
  54. *** ssap/ssapinitiate.c~    Wed Jun  5 13:54:11 1991
  55. --- ssap/ssapinitiate.c    Wed Jun  5 16:01:31 1991
  56. ***************
  57. *** 162,171 ****
  58. --- 162,184 ----
  59.   
  60.       if ((sb = newsblk ()) == NULL)
  61.       return ssaplose (si, SC_CONGEST, NULLCP, "out of memory");
  62. + 
  63. + #ifdef notanymore     /* Possible cause of QUIPU watchdogs */
  64. + 
  65.       if (!async || qos == NULLQOS || qos -> qos_maxtime <= 0)
  66.       sb -> sb_maxtime = NOTOK;
  67.       else
  68.       sb -> sb_maxtime = qos -> qos_maxtime;
  69. + 
  70. + #else
  71. + 
  72. +     if (!async || qos == NULLQOS)
  73. +     sb -> sb_maxtime = NOTOK;
  74. +     else
  75. +     if ((sb -> sb_maxtime = qos -> qos_maxtime) == 0)
  76. +         sb -> sb_maxtime = 1;    /* Very nearly zero */
  77. + 
  78. + #endif
  79.   
  80.       if ((s = newspkt (SPDU_CN)) == NULL) {
  81.       (void) ssaplose (si, SC_CONGEST, NULLCP, "out of memory");
  82. ORIGINAL REPORT:
  83.         from the development team
  84. -------------------- Bug No 2 --------------------------
  85. Return-Path: <c.robbins@uk.co.xtel>
  86. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  87.           id <02732-0@lancaster.xtel.co.uk>; Tue, 12 Mar 1991 13:28:19 +0000
  88. To: quipu-bugs@xtel.co.uk
  89. Subject: Dish memory leak
  90. Date: Tue, 12 Mar 91 13:28:49 +0000
  91. From: Colin Robbins <c.robbins@xtel.co.uk>
  92.  
  93. QUIPU VERSION:    6.8
  94.  
  95. ISODE VERSION:    6.8
  96.  
  97. MACHINE:    Sun 4/330 (X-TEL config)
  98.  
  99. O/S:        SunOS 4.1
  100.  
  101. PROGRAM/CHANNEL:
  102.         dish
  103.  
  104. SYNOPSIS:    dish slowly gets bigger and bigger
  105.         during a session. (partial fix only)
  106.  
  107. DESCRIPTION:
  108.  
  109. REPEAT BY:    running dish!
  110.  
  111. SAMPLE FIX:    
  112.  
  113. *** quipu/dish/_dishlib.c    Tue Mar 19 14:56:22 1991
  114. --- quipu/dish/dishlib.c    Tue Mar 19 14:55:58 1991
  115. ***************
  116. *** 64,70 ****
  117.   char    frompipe;
  118.   PS    opt, rps;
  119.   
  120. ! DN              savename;
  121.   
  122.   SFD             dish_quit ();
  123.   SFD             dish_intr ();
  124. --- 64,70 ----
  125.   char    frompipe;
  126.   PS    opt, rps;
  127.   
  128. ! DN              savename = NULLDN;
  129.   
  130.   SFD             dish_quit ();
  131.   SFD             dish_intr ();
  132. ***************
  133. *** 447,452 ****
  134. --- 447,454 ----
  135.               (void) signal (SIGALRM, SIG_IGN); /* unset alarm */
  136.               command = TidyString(inbuf);
  137.           }
  138. +         if (savename)
  139. +             dn_free (savename);
  140.           savename = dn_cpy (dn);
  141.           hide_picture();
  142.           dish_state = BUSY;
  143.  
  144. ORIGINAL REPORT:
  145.  
  146. ------- Forwarded Messages
  147.  
  148. Subject: More on PE memory leaks in 6.7m
  149. Reported-On: Mon, 04 Mar 91 20:19:06 +0000
  150. Reported-By: valdis@vttcf.cc.vt.edu (Valdis Kletnieks)
  151. Reported-To: bug-isode@nisc.psi.net
  152.  
  153. After doing more research, it appears the problem is as follows:
  154.  
  155. PE's are allocated by psap/qbuf2pe_f.c at line 129.
  156.  
  157. However, the various routines in pepsy/fre.c only actually issue
  158. a pe_free() for (essentially) the case pe->pe_form == PE_PRIM.
  159. For the various constructor cases, after pepsy/dec.c (in pr_seq()
  160. and friends) has walked over the PE and created a tpe, the PE is
  161. essentially dropped on the floor and ignored.
  162.  
  163. For the various constructors, I beleive that either fre.c should
  164. be freeing the PE (which also imples that dec.c saves the pointer
  165. in the tpe->pe_ucode field (or similar hack)), or that dec.c should
  166. issue a pe_free() once it has build the corresponding tpe.
  167.  
  168.                 Valdis Kletnieks
  169.                 Computer Systems Engineer
  170.                 Virginia Tech
  171.  
  172. ------- Message 2
  173.  
  174. Subject: Memory leak in isode-6.7m/quipu/dish/dishlib.c
  175. Reported-On: Tue, 05 Mar 91 01:28:22 +0000
  176. Reported-By: valdis@vttcf.cc.vt.edu (Valdis Kletnieks)
  177. Reported-To: bug-isode@nisc.psi.net
  178.  
  179. quipu/dish/dishlib.c:do_dish(), line 444 contains a call to dn_cpy()
  180. which creates a new copy of the current DN, which is never released.
  181. The resulting pointer is saved in 'savename', and only reset in
  182. dishhelp.c:Usage().
  183.  
  184. In our particular case, this results in a leak of 6 malloc() calls,
  185. of 8, 16, 3, 8, 16, and 14 bytes respectively.
  186.  
  187.                 Valdis Kletnieks
  188.                 Computer Systems Engineer
  189.                 Virginia Tech
  190.  
  191. ------- End of Forwarded Messages
  192.  
  193. -------------------- Bug No 3 --------------------------
  194. Return-Path: <c.robbins@uk.co.xtel>
  195. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  196.           id <02755-0@lancaster.xtel.co.uk>; Tue, 12 Mar 1991 13:30:35 +0000
  197. To: quipu-bugs@xtel.co.uk
  198. Subject: Loosing file descriptors
  199. Date: Tue, 12 Mar 91 13:31:06 +0000
  200. From: Colin Robbins <c.robbins@xtel.co.uk>
  201.  
  202. QUIPU VERSION:    6.8
  203.  
  204. ISODE VERSION:    6.8
  205.  
  206. MACHINE:    Sun 4/330 (X-TEL config)
  207.  
  208. O/S:        SunOS 4.1
  209.  
  210. PROGRAM/CHANNEL:
  211.         ros.quipu
  212.  
  213. SYNOPSIS:    ros.quipu seems to loose track of a file descriptor
  214.         from time to time (no fix yet)
  215.  
  216. DESCRIPTION:    kill -USR1 now gives a list of fd's accoring to the 
  217.         UNIX kernal, and Quipu.  These do not always agree!
  218.  
  219. REPEAT BY:
  220.  
  221. SAMPLE FIX:
  222.  
  223. ORIGINAL REPORT:
  224.          Marshall Rose
  225. -------------------- Bug No 4 --------------------------
  226. Return-Path: <c.robbins@uk.co.xtel>
  227. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  228.           id <03082-0@lancaster.xtel.co.uk>; Tue, 12 Mar 1991 13:34:08 +0000
  229. To: quipu-bugs@xtel.co.uk
  230. Subject: Control c in dish
  231. Date: Tue, 12 Mar 91 13:34:38 +0000
  232. From: Colin Robbins <c.robbins@xtel.co.uk>
  233.  
  234. QUIPU VERSION:    6.8
  235.  
  236. ISODE VERSION:    6.8
  237.  
  238. MACHINE:    Sun 4/330 (X-TEL config)
  239.  
  240. O/S:        SunOS 4.1
  241.  
  242. PROGRAM/CHANNEL:
  243.         dish
  244.  
  245. SYNOPSIS:    when searching, a control-c to dish will sometimes
  246.         cause a core dump (no fix yet)
  247.     
  248.  
  249. DESCRIPTION:    It seems to be OK if dish is in select.  The problem
  250.         would appear to happen when on the "way down" or
  251.         "way up" the stack.
  252.         Tim Howes reported this can core dump the DSA.
  253.  
  254. REPEAT BY:
  255.  
  256. SAMPLE FIX:
  257.  
  258. ORIGINAL REPORT:
  259.          Paul Barker
  260.         Time Howes.
  261. -------------------- Bug No 5 --------------------------
  262. Return-Path: <c.robbins@uk.co.xtel>
  263. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  264.           id <14125-0@lancaster.xtel.co.uk>; Thu, 14 Mar 1991 14:56:34 +0000
  265. To: quipu-bugs@xtel.co.uk
  266. Subject: Modify inherited attributes
  267. Date: Thu, 14 Mar 91 14:57:14 +0000
  268. From: Colin Robbins <c.robbins@xtel.co.uk>
  269.  
  270. QUIPU VERSION:    6.8
  271.  
  272. ISODE VERSION:    6.8
  273.  
  274. MACHINE:    Sun 4/330 (X-TEL config)
  275.  
  276. O/S:        SunOS 4.1
  277.  
  278. PROGRAM/CHANNEL:
  279.         ros.quipu
  280.  
  281. SYNOPSIS:
  282.         Can not modify an attribute value if it is inherited
  283.         into your entry.
  284.  
  285. DESCRIPTION:
  286.         If an attribute is inherited into an entry, then
  287.         attempts to modify the entry via DAP fail with an 
  288.         access rights error message (even if bound as the DSA
  289.         manager). 
  290.  
  291. SAMPLE FIX:
  292.                No patch as yet.
  293.         You can worked round it by first adding the new value
  294.         for the attribute, then in a second operation removing 
  295.         the inherited value (if it is default inherited).
  296.  
  297. ORIGINAL REPORT:
  298.          From the WPP pilot.
  299.  
  300. -------------------- Bug No 6 --------------------------
  301. Return-Path: <c.robbins@uk.co.xtel>
  302. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  303.           id <21255-0@lancaster.xtel.co.uk>; Fri, 15 Mar 1991 09:12:55 +0000
  304. To: quipu-bugs@xtel.co.uk
  305. Subject: dsastats
  306. Date: Fri, 15 Mar 91 09:13:40 +0000
  307. From: Colin Robbins <c.robbins@xtel.co.uk>
  308.  
  309.  
  310. QUIPU VERSION:    6.8
  311.  
  312. ISODE VERSION:    6.8
  313.  
  314. MACHINE:    Sun 4/330 (X-TEL config)
  315.  
  316. O/S:        SunOS 4.1
  317.  
  318. PROGRAM:    dsastats
  319.  
  320. SYNOPSIS:    date showed up incorrectly from time to time
  321.  
  322. DESCRIPTION:
  323.  
  324. REPEAT BY:
  325.  
  326. SAMPLE FIX:    patch below
  327.  
  328. ORIGINAL REPORT:
  329.  
  330. ------- Forwarded Message
  331.  
  332. Subject: A few small awk tweaks...
  333. Reported-On: Wed, 13 Mar 91 21:39:13 +0000
  334. Reported-By: root@vttcf.cc.vt.edu (The Super-user)
  335. Reported-To: bug-isode@nisc.psi.net
  336.  
  337. (1) Added a count for '(protected)' binds
  338. (2) Fixed a problem where the day showed as '2147483647 mar'
  339.  
  340.                 Valdis Kletnieks
  341.                 Computer Systems Engineer
  342.                 Virginia Tech
  343.  
  344. - -- start patch file against isode-interim sources --
  345. *** others/quipu/tools/dsastats/dsastats.dist.real    Wed Mar 13 16:06:38 199
  346. 1
  347. - --- others/quipu/tools/dsastats/dsastats.dist    Wed Mar 13 16:35:12 1991
  348. ***************
  349. *** 44,50 ****
  350.   }
  351.       {    
  352.           monthno = substr($0, 1, 2) + 0
  353. !         dayno = substr($0, 4, 2)
  354.           time = substr($0, 7, 8)
  355.           printf("%s on %02d %s", time, dayno, montharray[monthno])
  356.       } '
  357. - --- 44,50 ----
  358.   }
  359.       {    
  360.           monthno = substr($0, 1, 2) + 0
  361. !         dayno = substr($0, 4, 2) + 0
  362.           time = substr($0, 7, 8)
  363.           printf("%s on %02d %s", time, dayno, montharray[monthno])
  364.       } '
  365. ***************
  366. *** 349,354 ****
  367. - --- 349,362 ----
  368.           localsimple++
  369.   }
  370.   
  371. + /.* bind.*\(protected\).*/ {
  372. + 
  373. +     if (substr($0, 1, 6) == "remote")
  374. +         remoteprotected++
  375. +     else
  376. +         localprotected++
  377. + }
  378. + 
  379.   / bind.*\(no auth\)| bind.*\(simple\)/ {
  380.       n = index($0, ":")
  381.       username = substr($0, n+2)
  382. ***************
  383. *** 468,473 ****
  384. - --- 476,482 ----
  385.       printf "%-20s%10s%8d%8d\n", "Unauth name DAP", "", localnoauthdap, remo
  386. tenoauthdap
  387.       printf "%-20s%10s%8d%8d\n", "Unauth name DSP", "",localnoauthdsp, remot
  388. enoauthdsp
  389.       printf "%-20s%10s%8d%8d\n", "Simple", "", localsimple, remotesimple
  390. +     printf "%-20s%10s%8d%8d\n", "Protected", "", localprotected, remoteprot
  391. ected
  392.   
  393.   #print "have this list of users"
  394.   #for (user in usernames)
  395. - -- end patch file --
  396.  
  397.  
  398. ------- End of Forwarded Message
  399.  
  400. -------------------- Bug No 7 --------------------------
  401. Return-Path: <c.robbins@uk.co.xtel>
  402. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  403.           id <21266-0@lancaster.xtel.co.uk>; Fri, 15 Mar 1991 09:14:12 +0000
  404. To: quipu-bugs@xtel.co.uk
  405. Subject: 'help' function in 'pod' broken
  406. Date: Fri, 15 Mar 91 09:14:54 +0000
  407. From: Colin Robbins <c.robbins@xtel.co.uk>
  408.  
  409. QUIPU VERSION:    6.8
  410.  
  411. ISODE VERSION:    6.8
  412.  
  413. MACHINE:    Sun 4/330 (X-TEL config)
  414.  
  415. O/S:        SunOS 4.1
  416.  
  417. PROGRAM:    pod
  418.  
  419. SYNOPSIS:    'help' function in 'pod' broken
  420.  
  421. DESCRIPTION:
  422.  
  423. REPEAT BY:
  424.  
  425. SAMPLE FIX:    patch below
  426.  
  427. ORIGINAL REPORT:
  428.  
  429. ------- Forwarded Message
  430.  
  431. Subject: 'help' function in 'pod' broken
  432. Reported-On: Wed, 13 Mar 91 23:30:05 +0000
  433. Reported-By: valdis@vttcf.cc.vt.edu (Valdis Kletnieks)
  434. Reported-To: bug-isode@nisc.psi.net
  435.  
  436. A bad assignment to a pathname keeps the 'help' function from working.
  437. A patch against the isode-interim sources follows.
  438.  
  439.                 Valdis Kletnieks
  440.                 Computer Systems Engineer
  441.                 Virginia Tech
  442. - -- start patch file --
  443. *** others/quipu/uips/pod/calls.c.dist    Wed Mar 13 18:21:20 1991
  444. - --- others/quipu/uips/pod/calls.c    Wed Mar 13 18:21:23 1991
  445. ***************
  446. *** 139,145 ****
  447.     (void) strcpy(dua_help_dir, dua_config_dir);
  448.   
  449.     (void) strcat(dua_config_dir, "/duaconfig");
  450. !   (void) strcat(dua_help_dir, "/podHelpdir");
  451.   
  452.     (void) strcpy (user_path, getenv("HOME"));
  453.     (void) strcpy(read_path, user_path);
  454. - --- 139,145 ----
  455.     (void) strcpy(dua_help_dir, dua_config_dir);
  456.   
  457.     (void) strcat(dua_config_dir, "/duaconfig");
  458. !   (void) strcat(dua_help_dir, "/podHelpdir/");
  459.   
  460.     (void) strcpy (user_path, getenv("HOME"));
  461.     (void) strcpy(read_path, user_path);
  462. - -- end patch file --
  463.  
  464. ------- End of Forwarded Message
  465.  
  466. -------------------- Bug No 8 --------------------------
  467. Return-Path: <c.robbins@uk.co.xtel>
  468. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  469.           id <21240-0@lancaster.xtel.co.uk>; Fri, 15 Mar 1991 09:10:58 +0000
  470. To: quipu-bugs@xtel.co.uk
  471. Subject: fred format changed
  472. Date: Fri, 15 Mar 91 09:11:42 +0000
  473. From: Colin Robbins <c.robbins@xtel.co.uk>
  474.  
  475. ISODE VERSION:    6.8
  476.  
  477. MACHINE:    Sun 4/330 (X-TEL config)
  478.  
  479. O/S:        SunOS 4.1
  480.  
  481. PROGRAM:    fred
  482.  
  483. SYNOPSIS:    Fred format with -mail flag not quite the 
  484.         same as with 6.0
  485.  
  486. DESCRIPTION:    
  487.  
  488. REPEAT BY:
  489.  
  490. SAMPLE FIX:    patch below
  491.  
  492. ORIGINAL REPORT:
  493.          carlson@lll-winken.llnl.gov
  494.  
  495.  
  496.  
  497. ------- Forwarded Message
  498.  
  499. Subject: Re: 6.8 upgrade question
  500. Reported-On: Tue, 12 Mar 91 14:07:10 -0800
  501. Reported-By: Marshall Rose <mrose@cheetah.ca.psi.com>
  502. Reported-To: carlson@lll-winken.llnl.gov
  503.  
  504. Try this patch and let me know what you think.
  505.  
  506. /mtr
  507. *** quipu/dish/_fred.c    Sat Mar  9 11:56:30 1991
  508. - --- quipu/dish/fred.c    Tue Mar 12 14:03:49 1991
  509. ***************
  510. *** 88,93 ****
  511. - --- 88,96 ----
  512.   extern    LLog   *dad_log;
  513.   #endif
  514.   
  515. + extern    Attr_Sequence
  516. +             ufnas;
  517. + 
  518.   char        fred_flag;
  519.   char        fred_expand;
  520.   char        fred_list;
  521. ***************
  522. *** 136,146 ****
  523. - --- 139,161 ----
  524.   int    argc;
  525.   char  **argv;
  526.   {
  527. +     static int did_ufnas = 0;
  528. + 
  529.       if (argc < 2)
  530.       goto usage;
  531.   
  532.       fred_init ();
  533. +     if (!did_ufnas) {
  534. +     if (ufn_init () == FALSE) {
  535. +         ps_printf (OPT, "UFN initialization fails.\n");
  536. +         return;
  537. +     }
  538.   
  539. +     ufnas = as_merge (ufnas, as_cpy (fred_as ()));
  540. + 
  541. +     did_ufnas = 1;
  542. +     }
  543. + 
  544.       if (test_arg (argv[1], "-display", 7)) {
  545.       if (argc != 3)
  546.           goto usage;
  547. ***************
  548. *** 858,865 ****
  549.   extern    char    search_result;
  550.   #endif
  551.   extern    char    remote_prob;
  552. - - extern    Attr_Sequence
  553. - -             ufnas;
  554.   
  555.   /*   */
  556.   
  557. - --- 873,878 ----
  558. ***************
  559. *** 869,879 ****
  560.   {
  561.       struct dn_seq  *dns;
  562.   
  563. - -     if (ufn_init () == FALSE) {
  564. - -     ps_printf (OPT, "UFN initialization fails.\n");
  565. - -     return;
  566. - -     }
  567. - - 
  568.       if (rebind () != OK)
  569.       return;
  570.   
  571. - --- 882,887 ----
  572. ***************
  573. *** 885,902 ****
  574.       else
  575.       fred_list = FALSE;
  576.       if (n > 0 && strcmp (vec[0], "-mailbox") == 0) {
  577. - -     static int did_ufnas = 0;
  578. - - 
  579.       n--, vec++;
  580.       fred_mailbox = TRUE;
  581. ! 
  582. !     if (!did_ufnas) {
  583. !         did_ufnas = 1;
  584. !         if (t_mbox == NULL)
  585. !         fatal (-100, "rfc822Mailbox: invalid attribute type");
  586. !         
  587. !         ufnas = as_merge (ufnas, as_cpy (fred_as ()));
  588. !     }
  589.       }
  590.       else
  591.       fred_mailbox = FALSE;
  592. - --- 893,902 ----
  593.       else
  594.       fred_list = FALSE;
  595.       if (n > 0 && strcmp (vec[0], "-mailbox") == 0) {
  596.       n--, vec++;
  597.       fred_mailbox = TRUE;
  598. !     if (t_mbox == NULL)
  599. !         fatal (-100, "rfc822Mailbox: invalid attribute type");
  600.       }
  601.       else
  602.       fred_mailbox = FALSE;
  603. ***************
  604. *** 1515,1524 ****
  605. - --- 1515,1526 ----
  606.       register DN    adn;
  607.       register RDN    rdn;
  608.   
  609. + /*
  610.       if (islong == FALSE) {
  611.           ufn_dn_print_aux (RPS, mydn, NULLDN, 0);
  612.           goto ufn_short;
  613.       }
  614. +  */
  615.       for (adn = mydn; adn -> dn_parent; adn = adn -> dn_parent)
  616.           continue;
  617.       myrdn = adn -> dn_rdn;
  618.  
  619. ------- End of Forwarded Message
  620.  
  621. -------------------- Bug No 9 --------------------------
  622. Return-Path: <c.robbins@uk.co.xtel>
  623. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  624.           id <01170-0@lancaster.xtel.co.uk>; Fri, 15 Mar 1991 16:40:10 +0000
  625. To: quipu-bugs@xtel.co.uk
  626. Subject: optimize_attr doc error
  627. Date: Fri, 15 Mar 91 16:40:03 +0000
  628. From: Colin Robbins <c.robbins@xtel.co.uk>
  629.  
  630. QUIPU VERSION:    6.8
  631.  
  632. ISODE VERSION:    6.8
  633.  
  634. MACHINE:    Sun 4/330 (X-TEL config)
  635.  
  636. O/S:        SunOS 4.1
  637.  
  638. PROGRAM:
  639.  
  640. SYNOPSIS:    documentation says index_attribute instead of optimize_attr
  641.  
  642. DESCRIPTION:
  643.  
  644. REPEAT BY:
  645.  
  646. SAMPLE FIX:    use optimize_attr
  647.  
  648. ORIGINAL REPORT:
  649.  
  650. ------- Forwarded Message
  651.  
  652. Subject: Documentation error in ISODE 6.8
  653. Reported-On: 15 Mar 91 11:17:00 -0500
  654. Reported-By: Peter (P.W.) Whittaker <PWW@BNR.ca>
  655. Reported-To: quipu-support@cs.ucl.ac.uk
  656.  
  657. Page 140 of V5 (QUIPU) says that optimize_attr is the quiputailor variable
  658. used to indicated which attributes are indexed, while Colin's upgrading
  659. document says that it is index_attribute.  Which (if any) is it?
  660.  
  661.  
  662. ------- End of Forwarded Message
  663.  
  664. -------------------- Bug No 10 --------------------------
  665. Return-Path: <c.robbins@uk.co.xtel>
  666. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  667.           id <07395-0@lancaster.xtel.co.uk>; Mon, 18 Mar 1991 08:13:45 +0000
  668. To: quipu-bugs@xtel.co.uk
  669. Subject: Inheritance scheam error
  670. Date: Mon, 18 Mar 91 08:13:54 +0000
  671. From: Colin Robbins <c.robbins@xtel.co.uk>
  672.  
  673. QUIPU VERSION:    6.8
  674.  
  675. ISODE VERSION:    6.8
  676.  
  677. MACHINE:    Sun 4/330 (X-TEL config)
  678.  
  679. O/S:        SunOS 4.1
  680.  
  681. PROGRAM:    ros.quipu
  682.  
  683. SYNOPSIS:    With inherited attributes you can introduce a schema
  684.         error that is not notice until the next DSA re-boot
  685.         (no fix yet)
  686.  
  687. DESCRIPTION:
  688.  
  689. REPEAT BY:
  690.  
  691. SAMPLE FIX:    
  692.  
  693. ORIGINAL REPORT:
  694.  
  695. ------- Forwarded Message
  696.  
  697. Subject: Inheritance (caution)
  698. Reported-On: Sun, 17 Mar 91 15:17:49 +0000
  699. Reported-By: "Andrew Macpherson (Postmaster)" <andrew@uk.co.stc.stl.palm13>
  700. Reported-To: quipu-support@cs.ucl.ac.uk
  701.  
  702.  
  703. Nice.  There are no checks though that the aggregate inheriting
  704. the properties has the ability to inherit those properties.  Eg
  705. `person' inheriting telephoneNumber --- you can add this to a running
  706. DSA, and not notice the schema error until re-boot time.
  707.  
  708. [[This may be in the documentation, I havn't run latex yet.]]
  709.  
  710. ------- End of Forwarded Message
  711.  
  712. -------------------- Bug No 11 --------------------------
  713. Return-Path: <c.robbins@uk.co.xtel>
  714. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  715.           id <09365-0@lancaster.xtel.co.uk>; Mon, 18 Mar 1991 09:55:11 +0000
  716. To: quipu-bugs@xtel.co.uk
  717. Subject: unknown di-type
  718. Date: Mon, 18 Mar 91 09:55:22 +0000
  719. From: Colin Robbins <c.robbins@xtel.co.uk>
  720.  
  721. QUIPU VERSION:    6.8
  722.  
  723. ISODE VERSION:    6.8
  724.  
  725. MACHINE:    Sun 4/330 (X-TEL config)
  726.  
  727. O/S:        SunOS 4.1
  728.  
  729. PROGRAM:    ros.quipu
  730.  
  731. SYNOPSIS:    see 
  732.         get_dsa_info_aux - unknown di-type nnn
  733.         followed by a DSA crash in the log files.
  734.  
  735. DESCRIPTION:    
  736.  
  737. REPEAT BY:
  738.  
  739. SAMPLE FIX:
  740.  
  741. *** quipu/_di_block.c    Mon Mar 18 15:30:32 1991
  742. --- quipu/di_block.c    Mon Mar 18 15:31:46 1991
  743. ***************
  744. *** 140,146 ****
  745.       {
  746.       di_tmp1_next = di_tmp1->di_next;
  747.   
  748. !     switch(di->di_state)
  749.       {
  750.       case DI_ACCESSPOINT:
  751.       case DI_COMPLETE:
  752. --- 140,146 ----
  753.       {
  754.       di_tmp1_next = di_tmp1->di_next;
  755.   
  756. !     switch(di_tmp1->di_state)
  757.       {
  758.       case DI_ACCESSPOINT:
  759.       case DI_COMPLETE:
  760.  
  761.  
  762. ORIGINAL REPORT:
  763.  
  764. ------- Forwarded Message
  765.  
  766. Subject: quipu-6.8
  767. Reported-On: Sun, 17 Mar 91 18:45:27 +0000
  768. Reported-By: philip@bigben.dle.dg.com (Philip Gladstone)
  769. Reported-To: quipu-support@cs.ucl.ac.uk
  770.  
  771. Hello all,
  772.  
  773.         I have managed to get quipu-6.8 running (c=gb@cn=Northern
  774. Pudu). However, I don't know how to change the copy of the dsa entry
  775. that resides in the c=GB EDB. Help please!
  776.  
  777.         I'm also experiencing some crashes which seem to be associated
  778. with remote dsa information. [The following is a repeatable error that
  779. arises if i do a 'list @c=de']. Could this be related to the fact that
  780. the entry for my DSA is out of date?
  781.  
  782. get_dsa_info_aux - unknown di-type 117
  783. Listening on ads:  6, 5.
  784. get_dsa_info_aux - unknown di-type 117
  785. Listening on ads:  6, 5.
  786. Should wake global
  787. dsa_info_error_wakeup - invalid di_type
  788. DSA c=gb@CN=Northern Pudu has a problem  <-- crash in dsa_info_error_wakeup
  789.  
  790.  
  791.  
  792. Weekend Hacker of Cambridge
  793.  
  794. ------- End of Forwarded Message
  795.  
  796. -------------------- Bug No 12 --------------------------
  797. Return-Path: <c.robbins@uk.co.xtel>
  798. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  799.           id <09393-0@lancaster.xtel.co.uk>; Mon, 18 Mar 1991 10:00:11 +0000
  800. To: quipu-bugs@xtel.co.uk
  801. Subject: dish dies on invalid ASN.1
  802. Date: Mon, 18 Mar 91 10:00:21 +0000
  803. From: Colin Robbins <c.robbins@xtel.co.uk>
  804.  
  805. QUIPU VERSION:    6.8
  806.  
  807. ISODE VERSION:    6.8
  808.  
  809. MACHINE:    Sun 4/330 (X-TEL config)
  810.  
  811. O/S:        SunOS 4.1
  812.  
  813. PROGRAM:    dish (and general ISODE)
  814.  
  815. SYNOPSIS:    If given invalid ASN.1 a program can die due to a
  816.         pepsy related bug (no fix yet)
  817.  
  818. DESCRIPTION:    It is feared the fix below is only one such situation,
  819.         there may be others. Time will tell.
  820.  
  821. REPEAT BY:
  822.  
  823. SAMPLE FIX:    Supplied by Andrew Worsley...
  824.  
  825. *** pepsy/dec.c_orig    Sat Feb 23 05:03:45 1991
  826. --- pepsy/dec.c        Wed Mar 20 17:02:46 1991
  827. ***************
  828. *** 1559,1564 ****
  829. --- 1559,1566 ----
  830.       for (cnt = 1; p->pe_type != PE_END; NEXT_TPE(p)) {
  831.       if (ISDTYPE(p)) {
  832.           if (ismatch(p, mod, head->pe_class, head->pe_id)) {
  833. +         if (!savep && poffset)
  834. +             *poffset = cnt;
  835.           if (pr_etype(head, parm, p, mod) == NOTOK)
  836.               goto bad;
  837.           if (savep) {
  838. ***************
  839. *** 1567,1574 ****
  840.                (*mod -> md_ducode)(parm, head, savep, cnt) == NOTOK))
  841.               goto bad;
  842.           }
  843. -         else
  844. -             *poffset = cnt;
  845.           NEXT_TPE(p);
  846.           if (p->pe_type == UCODE) {
  847.               if (mod->md_ducode == NULLIFP
  848. --- 1569,1574 ----
  849.  
  850. ORIGINAL REPORT:
  851.          CJR to quipu-support when testing Pizarro
  852. -------------------- Bug No 13 --------------------------
  853. Return-Path: <c.robbins@uk.co.xtel>
  854. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  855.           id <17564-0@lancaster.xtel.co.uk>; Mon, 18 Mar 1991 17:08:09 +0000
  856. To: quipu-bugs@xtel.co.uk
  857. Subject: misc fix
  858. Date: Mon, 18 Mar 91 17:08:20 +0000
  859. From: Colin Robbins <c.robbins@xtel.co.uk>
  860.  
  861. QUIPU VERSION:    6.8
  862.  
  863. ISODE VERSION:    6.8
  864.  
  865. MACHINE:    Sun 4/330 (X-TEL config)
  866.  
  867. O/S:        SunOS 4.1
  868.  
  869. PROGRAM:    ros.quipu
  870.  
  871. SYNOPSIS:    A few unimportant bug fixes put here
  872.         for completeness
  873.  
  874. DESCRIPTION:    
  875.  
  876. REPEAT BY:
  877.  
  878. SAMPLE FIX:
  879.  
  880. *** quipu/_find_entry.c    Mon Mar 18 16:59:37 1991
  881. --- quipu/find_entry.c    Mon Mar 18 17:04:13 1991
  882. ***************
  883. *** 609,615 ****
  884.               (ptr->e_data == E_TYPE_SLAVE) ||
  885.                   ((ptr->e_data == E_TYPE_CACHE_FROM_MASTER) &&
  886.                (timenow - ptr->e_age < cache_timeout))) {
  887. !             if ( (ptr->e_master == NULLAV) && (ptr->e_slave == NULLAV))
  888.                   continue ;
  889.               return(dsa_info_new(object,dn_stack,master,ptr,err,di_p));
  890.           }
  891. --- 609,615 ----
  892.               (ptr->e_data == E_TYPE_SLAVE) ||
  893.                   ((ptr->e_data == E_TYPE_CACHE_FROM_MASTER) &&
  894.                (timenow - ptr->e_age < cache_timeout))) {
  895. !             if ( (!ptr->e_external) && (ptr->e_master == NULLAV) && (ptr->e_slave == NULLAV))
  896.                   continue ;
  897.               return(dsa_info_new(object,dn_stack,master,ptr,err,di_p));
  898.           }
  899.  
  900. *** quipu/_dsa.c    Tue Mar 19 08:49:31 1991
  901. --- quipu/dsa.c    Tue Mar 19 08:50:18 1991
  902. ***************
  903. *** 385,391 ****
  904.       for (sd = 3; sd < nbits; sd++) {
  905.       if (log_dsap -> ll_fd == sd)
  906.           continue;
  907. ! #ifdef    NO_STATS
  908.       if (log_stats -> ll_fd == sd)
  909.           continue;
  910.   #endif
  911. --- 385,391 ----
  912.       for (sd = 3; sd < nbits; sd++) {
  913.       if (log_dsap -> ll_fd == sd)
  914.           continue;
  915. ! #ifndef    NO_STATS
  916.       if (log_stat -> ll_fd == sd)
  917.           continue;
  918.   #endif
  919. ***************
  920. *** 499,505 ****
  921.       for (sd = 3; sd < nbits; sd++) {
  922.           if (log_dsap -> ll_fd == sd)
  923.           continue;
  924. ! #ifdef    NO_STATS
  925.           if (log_stats -> ll_fd == sd)
  926.           continue;
  927.   #endif
  928. --- 499,505 ----
  929.       for (sd = 3; sd < nbits; sd++) {
  930.           if (log_dsap -> ll_fd == sd)
  931.           continue;
  932. ! #ifndef    NO_STATS
  933.           if (log_stats -> ll_fd == sd)
  934.           continue;
  935.   #endif
  936. *** quipu/_ds_search.c    Tue Mar 19 11:59:46 1991
  937. --- quipu/ds_search.c    Tue Mar 19 12:00:34 1991
  938. ***************
  939. *** 1596,1602 ****
  940.   register char * str2;
  941.   register int count;
  942.   char * top, *top2;
  943. ! char found;
  944.   
  945.       top = str1;
  946.       top2 = str2 = (char *)av->av_struct;
  947. --- 1596,1602 ----
  948.   register char * str2;
  949.   register int count;
  950.   char * top, *top2;
  951. ! char found = 0;
  952.   
  953.       top = str1;
  954.       top2 = str2 = (char *)av->av_struct;
  955. *** quipu/_oper_act.c    Tue Mar 19 10:47:56 1991
  956. --- quipu/oper_act.c    Tue Mar 19 11:55:13 1991
  957. ***************
  958. *** 187,192 ****
  959. --- 187,196 ----
  960.   
  961.       on->on_dsas = NULL_DI_BLOCK;
  962.   
  963. +     if (on->on_task &&
  964. +     (on->on_task->tk_result == &(on->on_resp.di_result.dr_res)))
  965. +         on->on_task->tk_result = (struct ds_op_res *) NULL;
  966. + 
  967.       on->on_task = NULLTASK; /* Shows that this has been task_extracted */
  968.   }
  969.   
  970. *** quipu/_task_act.c    Tue Mar 19 10:55:21 1991
  971. --- quipu/task_act.c    Tue Mar 19 10:56:03 1991
  972. ***************
  973. *** 58,63 ****
  974. --- 58,64 ----
  975.       if (tk->tk_resp.di_type == DI_ERROR)
  976.           ds_error_free (tk->tk_error);
  977.       else if (tk->tk_resp.di_type == DI_RESULT)
  978. +       if (tk->tk_result)
  979.       if (tk->tk_conn->cn_ctx == DS_CTX_X500_DAP)
  980.           ds_res_free (&(tk->tk_result->dcr_dsres));
  981.       else
  982.  
  983. ORIGINAL REPORT:
  984.          
  985.         Saber C!
  986. -------------------- Bug No 14 --------------------------
  987. Return-Path: <c.robbins@uk.co.xtel>
  988. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  989.           id <01065-0@lancaster.xtel.co.uk>; Wed, 20 Mar 1991 16:08:21 +0000
  990. To: quipu-bugs@xtel.co.uk
  991. Subject: modify bug
  992. Date: Wed, 20 Mar 91 16:08:39 +0000
  993. From: Colin Robbins <c.robbins@xtel.co.uk>
  994.  
  995. QUIPU VERSION:    6.8
  996.  
  997. ISODE VERSION:    6.8
  998.  
  999. MACHINE:    Sun 4/330 (X-TEL config)
  1000.  
  1001. O/S:        SunOS 4.1
  1002.  
  1003. PROGRAM:    ros.quipu
  1004.  
  1005. SYNOPSIS:    Can core dump if adding a non leaf object
  1006.  
  1007. DESCRIPTION:    
  1008.  
  1009. REPEAT BY:
  1010.  
  1011. SAMPLE FIX:
  1012.  
  1013. *** quipu/_ds_modify.c    Wed Mar 20 16:07:22 1991
  1014. --- quipu/ds_modify.c    Wed Mar 20 16:07:06 1991
  1015. ***************
  1016. *** 727,732 ****
  1017. --- 727,736 ----
  1018.           free (eptr->e_parent->e_edbversion);
  1019.       eptr->e_parent->e_edbversion = new_version();
  1020.   
  1021. +     if (eptr->e_edbversion)
  1022. +         free (eptr->e_edbversion);
  1023. +     eptr->e_edbversion = new_version();
  1024. + 
  1025.       save_dn = get_copy_dn(eptr) ;
  1026.   
  1027.       if ((filename = dn2edbfile(save_dn)) == NULLCP)
  1028.  
  1029. ORIGINAL REPORT:
  1030.  
  1031. ------- Forwarded Message
  1032.  
  1033. Subject: Bug in (dish,quipu,or dsap) ?
  1034. Reported-On: Wed, 20 Mar 91 14:07:46 +0000
  1035. Reported-By: Alan Shepherd <gas@cs.nott.ac.uk>
  1036. Reported-To: c.robbins@xtel.co.uk
  1037.  
  1038.  
  1039. Colin,
  1040.  
  1041. adding an entry to the tree then immedaitely deleting ti causes 
  1042. ros.quipu to die on sig 11.  The entry is deleted, but a bad eDB file
  1043. is left lying around.  See /usr/tmp/dsap.log for detatils.
  1044.  
  1045. alan
  1046.  
  1047. ------- End of Forwarded Message
  1048.  
  1049. -------------------- Bug No 15 --------------------------
  1050. Return-Path: <c.robbins@uk.co.xtel>
  1051. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  1052.           id <02729-0@lancaster.xtel.co.uk>; Tue, 2 Apr 1991 09:55:25 +0100
  1053. To: quipu-bugs@xtel.co.uk
  1054. Subject: AOFFSET
  1055. Date: Tue, 02 Apr 91 09:56:46 +0100
  1056. From: Colin Robbins <c.robbins@xtel.co.uk>
  1057.  
  1058. QUIPU VERSION:    6.8
  1059.  
  1060. ISODE VERSION:    6.8
  1061.  
  1062. MACHINE:    Sun 4/330 (X-TEL config)
  1063.  
  1064. O/S:        SunOS 4.1
  1065.  
  1066. PROGRAM:    libdsap
  1067.  
  1068. SYNOPSIS:    Some compilers complain about compiling AOFFSET in x500as
  1069.  
  1070. DESCRIPTION:
  1071.  
  1072. REPEAT BY:
  1073.  
  1074. SAMPLE FIX:
  1075.  
  1076. ORIGINAL REPORT:
  1077.  
  1078. ------- Forwarded Messages
  1079.  
  1080. Subject: Re: Another 6.8 incompatability
  1081. Reported-On: Tue, 26 Mar 91 08:40:59 -0800
  1082. Reported-By: Marshall Rose <mrose@cheetah.ca.psi.com>
  1083. Reported-To: kincl@iag.hp.com (Norman Kincl)
  1084.  
  1085. To my reading, both definitions of AOFFSET are legal.  The last time I check
  1086. K&R, saying
  1087.  
  1088.     &a[0]
  1089.  
  1090. was always equivalent to saying
  1091.  
  1092.     a
  1093.  
  1094. The problem is that not all C compilers know this.  Some fail on case #1 and
  1095. others fail on case #2.  I have solved the problem temporarily by putting
  1096. case #1 under an #ifdef hpux and case #2 otherwise...
  1097.  
  1098. /mtr
  1099.  
  1100. ------- Message 2
  1101.  
  1102. Subject: Another 6.8 incompatability
  1103. Reported-On: Mon, 25 Mar 91 17:10:40 -0800
  1104. Reported-By: Norman Kincl <kincl@iag.hp.com>
  1105. Reported-To: wpp-camayocs@nisc.psi.net
  1106.  
  1107.  
  1108. While trying to make dsap/x500as, I ran into some compiler errors complaining
  1109. about "incorrect initialization".  I traced this to the AOFFSET macro.  It is
  1110. defined to be
  1111.     #define AOFFSET(t,f)    ((int ) (((t *)0)->f))
  1112. As best as we could figure out, the difference between AOFFSET and OFFSET is
  1113. that AOFFSET gives you the offset to an element which is an array.  We changed
  1114. the definition to the following:
  1115.     #define AOFFSET(t,f)    ((int ) &(((t *)0)->f[0]))
  1116.  
  1117. Question: is one or the other more or less standard C?  (Do we have a compiler
  1118. bug or does Quipu have a non-standard usgae of the language?
  1119.  
  1120. Note:  The right place to change things is in pepsy/pass2.c, changing the line
  1121. that reads:
  1122.     (void) fprintf(fptab, "\n#define AOFFSET(t,f)\t((int ) (((t *)0)->f))\n\n")
  1123. ;
  1124. to:
  1125.     (void) fprintf(fptab, "\n#define AOFFSET(t,f)\t((int ) &(((t *)0)->f[0]))\n
  1126. \n");
  1127.  
  1128. - -Norm Kincl
  1129.  
  1130. ------- End of Forwarded Messages
  1131.  
  1132. -------------------- Bug No 16 --------------------------
  1133. Return-Path: <c.robbins@uk.co.xtel>
  1134. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  1135.           id <09145-0@lancaster.xtel.co.uk>; Wed, 3 Apr 1991 09:42:10 +0100
  1136. To: quipu-bugs@xtel.co.uk
  1137. Subject: TURBO_DISK
  1138. Date: Wed, 03 Apr 91 09:43:36 +0100
  1139. From: Colin Robbins <c.robbins@xtel.co.uk>
  1140.  
  1141. QUIPU VERSION:    6.8
  1142.  
  1143. ISODE VERSION:    6.8
  1144.  
  1145. MACHINE:    Sun 4/330 (X-TEL config)
  1146.  
  1147. O/S:        SunOS 4.1
  1148.  
  1149. PROGRAM:    ros.quipu
  1150.  
  1151. SYNOPSIS:    TURBO_DISK causes a few problems 
  1152.  
  1153. DESCRIPTION:
  1154.  
  1155. REPEAT BY:
  1156.  
  1157. SAMPLE FIX:
  1158.  
  1159. *** /dev/null    Fri Mar 22 10:59:16 1991
  1160. --- quipu/turbo/file2dn.c    Fri Mar 22 11:00:43 1991
  1161. ***************
  1162. *** 0 ****
  1163. --- 1,32 ----
  1164. + #include <stdio.h>
  1165. + 
  1166. + main( argc, argv )
  1167. + int    argc;
  1168. + char    **argv;
  1169. + {
  1170. +     char    *dn, *p;
  1171. +     int    prefixlen;
  1172. + 
  1173. +     if ( argc < 3 )
  1174. +         prefixlen = 0;
  1175. +     else
  1176. +         prefixlen = strlen( argv[1] );
  1177. + 
  1178. +     dn = argv[2] + prefixlen;
  1179. + 
  1180. +     if ( *dn == '/' )
  1181. +         dn++;
  1182. + 
  1183. +     for ( p = dn; *p; p++ )
  1184. +         if ( *p == '/' )
  1185. +             *p = '@';
  1186. + 
  1187. +     for ( ; *p != '@' && p != dn; p-- )
  1188. +         *p = '\0';
  1189. +     *p = '\n';
  1190. + 
  1191. +     if ( p == dn )
  1192. +         dn = "root\n";
  1193. + 
  1194. +     write( 1, dn, strlen( dn ) );
  1195. + }
  1196. *** /dev/null    Fri Mar 22 10:59:16 1991
  1197. --- quipu/turbo/tdirname.c    Fri Mar 22 11:01:13 1991
  1198. ***************
  1199. *** 0 ****
  1200. --- 1,17 ----
  1201. + main( argc, argv )
  1202. + int    argc;
  1203. + char    **argv;
  1204. + {
  1205. +     char    *p, *rindex();
  1206. + 
  1207. +     if ( argc < 2 || ((p = rindex( argv[ 1 ], '/' )) == 0) ) {
  1208. +         write( 1, ".\n", sizeof( ".\n" ) );
  1209. +         exit( 0 );
  1210. +     }
  1211. + 
  1212. +     *p = '\0';
  1213. +     write( 1, argv[ 1 ], strlen( argv[ 1 ] ) );
  1214. +     write( 1, "\n", 1 );
  1215. + 
  1216. +     exit( 0 );
  1217. + }
  1218. *** quipu/entry_load.oc    Sat Mar 23 16:21:20 1991
  1219. --- quipu/entry_load.c    Sat Mar 23 16:57:50 1991
  1220. ***************
  1221. *** 86,92 ****
  1222. --- 86,96 ----
  1223.   char * file;
  1224.   {
  1225.   FILE * mapfp;
  1226. + #ifdef    TURBO_DISK
  1227. + char *ptr, *newname, *tmp, *fgetline();
  1228. + #else    /* TURBO_DISK */
  1229.   char *ptr, *newname, *tmp, *getline();
  1230. + #endif    /* TURBO_DISK */
  1231.   extern int parse_line;
  1232.   register int i;
  1233.   
  1234. ***************
  1235. *** 96,102 ****
  1236.       }
  1237.   
  1238.       parse_line = 0;
  1239. !     while ( (ptr = getline(mapfp)) != NULLCP) {
  1240.           if ((newname = rindex(ptr,'#')) == NULLCP) {
  1241.               LLOG(log_dsap,LLOG_EXCEPTIONS,("Seperator missing in map file \"%s\", line %d",file,parse_line));
  1242.               (void) fclose (mapfp);            
  1243. --- 100,111 ----
  1244.       }
  1245.   
  1246.       parse_line = 0;
  1247. ! #ifdef    TURBO_DISK
  1248. !     while ( (ptr = fgetline(mapfp)) != NULLCP)
  1249. ! #else    /* TURBO_DISK */
  1250. !     while ( (ptr = getline(mapfp)) != NULLCP) 
  1251. ! #endif    /* TURBO_DISK */
  1252. !     {
  1253.           if ((newname = rindex(ptr,'#')) == NULLCP) {
  1254.               LLOG(log_dsap,LLOG_EXCEPTIONS,("Seperator missing in map file \"%s\", line %d",file,parse_line));
  1255.               (void) fclose (mapfp);            
  1256. *** h/quipu/_turbo.h    Tue Mar 26 10:28:06 1991
  1257. --- h/quipu/turbo.h    Mon Mar 25 10:46:24 1991
  1258. ***************
  1259. *** 108,113 ****
  1260. --- 108,114 ----
  1261.       caddr_t        in_value;
  1262.       struct entry    **in_entries;
  1263.       int        in_num;
  1264. +     int        in_max;
  1265.   } Index_node;
  1266.   
  1267.   #define NULLINDEXNODE    ((Index_node *) 0)
  1268. *** dsap/common/_turbo_index.c    Mon Mar 25 10:20:07 1991
  1269. --- dsap/common/turbo_index.c    Tue Mar 26 13:33:46 1991
  1270. ***************
  1271. *** 101,123 ****
  1272.   Index_node    *node;
  1273.   Index_node    *dup;
  1274.   {
  1275. !     int    i, j;
  1276.       Entry    tmp1, tmp2;
  1277.   
  1278. !     /* check for duplicates */
  1279. !     for ( i = 0; i < node->in_num; i++ ) {
  1280. !         if ( node->in_entries[ i ] == dup->in_entries[ 0 ] )
  1281.               return( NOTOK );
  1282. !         if (node->in_entries[i] > dup->in_entries[0])
  1283. !             break;
  1284.       }
  1285.   
  1286. !     node->in_entries = (struct entry **) realloc( (char *)node->in_entries, 
  1287. !         (unsigned) (sizeof(struct entry *) * (node->in_num + 1) ));
  1288.       node->in_num++;
  1289.   
  1290.       tmp1 = dup->in_entries[0];
  1291. !     for (j = i; j < node->in_num; j++) {
  1292.           tmp2 = node->in_entries[j];
  1293.           node->in_entries[j] = tmp1;
  1294.           tmp1 = tmp2;
  1295. --- 101,162 ----
  1296.   Index_node    *node;
  1297.   Index_node    *dup;
  1298.   {
  1299. !     int    j;
  1300. !     int    low, mid, high;
  1301.       Entry    tmp1, tmp2;
  1302.   
  1303. !     /* 
  1304. !      * Check for duplicates.  If there are over 20 elements we do
  1305. !      * a binary search, otherwise a simple linear one.  This is just
  1306. !      * a guess.  It seems to work pretty well, though.
  1307. !      */
  1308. ! 
  1309. !     tmp1 = dup->in_entries[0];
  1310. ! 
  1311. !     if ( node->in_num > 20 ) {
  1312. !         low = 0;
  1313. !         high = node->in_num - 1;
  1314. !         mid = (low + high) / 2;
  1315. !         while ( low < high ) {
  1316. !             if ( node->in_entries[mid] < tmp1 )
  1317. !                 low = mid + 1;
  1318. !             else if ( node->in_entries[mid] > tmp1 )
  1319. !                 high = mid - 1;
  1320. !             else
  1321. !                 break;    /* found a duplicates */
  1322. ! 
  1323. !             mid = (low + high) / 2;
  1324. !         }
  1325. ! 
  1326. !         if ( node->in_entries[mid] == tmp1 )
  1327.               return( NOTOK );
  1328. !         else if ( node->in_entries[mid] < tmp1 )
  1329. !             mid++;
  1330. !     } else {
  1331. !         for ( mid = 0; mid < node->in_num; mid++ ) {
  1332. !             if ( node->in_entries[mid] == tmp1 )
  1333. !                 return( NOTOK );
  1334. !             if ( node->in_entries[mid] > tmp1 )
  1335. !                 break;
  1336. !         }
  1337.       }
  1338.   
  1339. !     /*
  1340. !      * Realloc double the space we got last time.  This may waste
  1341. !      * some space in the index, but it speeds things up, works
  1342. !      * around the QUIPU_MALLOC problem, and cuts down on fragmentation.
  1343. !      */
  1344. ! 
  1345. !     if (node->in_num >= node->in_max) {
  1346. !         node->in_max *= 2;
  1347. !         node->in_entries =
  1348. !             (struct entry **) realloc((char *)node->in_entries, 
  1349. !             (unsigned) (sizeof(struct entry *) * node->in_max));
  1350. !     }
  1351.       node->in_num++;
  1352.   
  1353.       tmp1 = dup->in_entries[0];
  1354. !     for (j = mid; j < node->in_num; j++) {
  1355.           tmp2 = node->in_entries[j];
  1356.           node->in_entries[j] = tmp1;
  1357.           tmp1 = tmp2;
  1358. ***************
  1359. *** 430,435 ****
  1360. --- 469,475 ----
  1361.               entry *) );
  1362.           imem->in_entries[ 0 ] = (struct entry *) e;
  1363.           imem->in_num = 1;
  1364. +         imem->in_max = 1;
  1365.   
  1366.           /*
  1367.            * Now we insert the entry into the appropriate index.
  1368. ***************
  1369. *** 462,467 ****
  1370. --- 502,508 ----
  1371.                   sizeof(struct entry *) );
  1372.               imem->in_entries[ 0 ] = (struct entry *) e;
  1373.               imem->in_num = 1;
  1374. +             imem->in_max = 1;
  1375.   
  1376.               if ( avl_insert( &pindex[i].i_sroot, (caddr_t) imem, sindex_cmp,
  1377.                   index_dup ) == OK ) {
  1378. ***************
  1379. *** 817,822 ****
  1380. --- 858,867 ----
  1381.           LLOG( log_dsap, LLOG_EXCEPTIONS, ("Invalid subtree (%s)\n", tree) );
  1382.           return;
  1383.       }
  1384. +     if ( turbo_index_num == 0 ) {
  1385. +         LLOG( log_dsap, LLOG_EXCEPTIONS, ("WARNING: cannot index subtree - no attributes have been optimized"));
  1386. +         return;
  1387. +     }
  1388.   
  1389.       pindex = new_index( dn );
  1390.       dn_free( dn );
  1391. ***************
  1392. *** 840,845 ****
  1393. --- 885,894 ----
  1394.   
  1395.       if ( (dn = str2dn( parent )) == NULLDN ) {
  1396.           LLOG( log_dsap, LLOG_EXCEPTIONS, ("Invalid parent (%s)\n", parent) );
  1397. +         return;
  1398. +     }
  1399. +     if ( turbo_index_num == 0 ) {
  1400. +         LLOG( log_dsap, LLOG_EXCEPTIONS, ("WARNING: cannot index siblings - no attributes have been optimized"));
  1401.           return;
  1402.       }
  1403.   
  1404. *** quipu/turbo/file2dn.c.orig    Fri Mar 22 11:00:43 1991
  1405. --- quipu/turbo/file2dn.c    Wed Mar 27 10:17:22 1991
  1406. ***************
  1407. *** 1,32 ****
  1408.   #include <stdio.h>
  1409.   
  1410. ! main( argc, argv )
  1411.   int    argc;
  1412.   char    **argv;
  1413.   {
  1414. !     char    *dn, *p;
  1415.       int    prefixlen;
  1416.   
  1417. !     if ( argc < 3 )
  1418.           prefixlen = 0;
  1419.       else
  1420. !         prefixlen = strlen( argv[1] );
  1421.   
  1422. !     dn = argv[2] + prefixlen;
  1423.   
  1424. !     if ( *dn == '/' )
  1425.           dn++;
  1426.   
  1427. !     for ( p = dn; *p; p++ )
  1428. !         if ( *p == '/' )
  1429. !             *p = '@';
  1430.   
  1431. !     for ( ; *p != '@' && p != dn; p-- )
  1432. !         *p = '\0';
  1433. !     *p = '\n';
  1434. ! 
  1435. !     if ( p == dn )
  1436. !         dn = "root\n";
  1437. ! 
  1438. !     write( 1, dn, strlen( dn ) );
  1439.   }
  1440. --- 1,55 ----
  1441.   #include <stdio.h>
  1442. + #include <string.h>
  1443.   
  1444. ! main(argc, argv)
  1445.   int    argc;
  1446.   char    **argv;
  1447.   {
  1448. !     char    *dn, *p, *mp;
  1449.       int    prefixlen;
  1450. +     int    mapped;
  1451. +     char    mapbuf[BUFSIZ];
  1452. +     char    dnbuf[3 * BUFSIZ];
  1453. +     char    mapfile[BUFSIZ];
  1454. +     FILE    *map;
  1455.   
  1456. !     if (argc < 3)
  1457.           prefixlen = 0;
  1458.       else
  1459. !         prefixlen = strlen(argv[1]);
  1460.   
  1461. !     dn = argv[argc - 1] + prefixlen;
  1462.   
  1463. !     if (*dn == '/')
  1464.           dn++;
  1465.   
  1466. !     dnbuf[0] = '\0';
  1467.   
  1468. !     while ((p = strchr(dn, '/')) != NULL) {
  1469. !         strncpy(mapfile, argv[argc - 1], dn - argv[argc - 1]);
  1470. !         mapfile[dn - argv[argc - 1]] = '\0';
  1471. !         strcat(mapfile, "EDB.map");
  1472. !         mapped = 0;
  1473. !         if ((map = fopen(mapfile, "r")) != NULL) {
  1474. !             while (fgets(mapbuf, BUFSIZ, map) != NULL)
  1475. !                 if ((mp = strchr(mapbuf, '#')) != NULL) {
  1476. !                     *mp++ = '\0';
  1477. !                     if (!strncmp(mp, dn, p - dn)) {
  1478. !                         strcat(dnbuf, mapbuf);
  1479. !                         mapped++;
  1480. !                         break;
  1481. !                     }
  1482. !                 }
  1483. !             fclose(map);
  1484. !         }
  1485. !         if (!mapped)
  1486. !             strncat(dnbuf, dn, p - dn);
  1487. !         strcat(dnbuf, "@");
  1488. !         dn = p + 1;
  1489. !     }
  1490. !     if (strlen(dnbuf) == 0)
  1491. !         strcpy(dnbuf, "root@");
  1492. !     p = strrchr(dnbuf, '@');
  1493. !     *p = '\0';
  1494. !     puts(dnbuf);
  1495.   }
  1496. *** quipu/turbo/_edb2dbm.c    Wed Apr  3 14:50:30 1991
  1497. --- quipu/turbo/edb2dbm.c    Wed Apr  3 14:50:41 1991
  1498. ***************
  1499. *** 106,111 ****
  1500. --- 106,112 ----
  1501.       }
  1502.   
  1503.       (void) gdbm_close(db);
  1504. +     exit(0);
  1505.   }
  1506.   
  1507.   
  1508. *** quipu/turbo/_edbcat.c    Wed Apr  3 14:50:55 1991
  1509. --- quipu/turbo/edbcat.c    Wed Apr  3 14:50:59 1991
  1510. ***************
  1511. *** 52,55 ****
  1512. --- 52,56 ----
  1513.       }
  1514.   
  1515.       (void) gdbm_close(db);
  1516. +     exit(0);
  1517.   }
  1518. *** quipu/turbo/_file2dn.c    Wed Apr  3 14:51:19 1991
  1519. --- quipu/turbo/file2dn.c    Wed Apr  3 14:51:23 1991
  1520. ***************
  1521. *** 52,55 ****
  1522. --- 52,56 ----
  1523.       p = strrchr(dnbuf, '@');
  1524.       *p = '\0';
  1525.       puts(dnbuf);
  1526. +     exit(0);
  1527.   }
  1528. ORIGINAL REPORT:
  1529.  
  1530. ------- Forwarded Messages
  1531.  
  1532. Subject: TURBO_DISK
  1533. Reported-On: Fri, 22 Mar 91 07:37:46 +0000
  1534. Reported-By: "Andrew Macpherson (Postmaster)" <A.Macpherson@stl.stc.co.uk>
  1535. Reported-To: quipu-support@cs.ucl.ac.uk
  1536.  
  1537.  
  1538. Thought I'ld try it:
  1539.  
  1540. isode-interim/quipu/turbo }- ./make
  1541. make: Fatal error: Don't know how to make target `file2dn.o'
  1542.  
  1543. no file2dn.c ?
  1544.  
  1545. May I have a copy --- I've 9000 changes, and 6000 additions to make, so this 
  1546. might help me get it done in sensible time.
  1547.  
  1548.  
  1549. ------- Message 2
  1550.  
  1551. Subject: Re: TURBO_DISK
  1552. Reported-On: Sat, 23 Mar 91 17:08:05 +0000
  1553. Reported-By: "Andrew Macpherson (Postmaster)" <andrew@uk.co.stc.stl.palm13>
  1554. Reported-To: quipu-support@cs.ucl.ac.uk
  1555.  
  1556. A small problem --- trying to read edb.map files as gdbm hashed files
  1557. is fixed with this patch.
  1558.  
  1559. Regards
  1560.     Andrew.
  1561. PS aren't weekends wonderful times to get things done?
  1562.  
  1563. *** CJR ***
  1564. Patch removed and placed with a full set of fixes above
  1565. ***********
  1566.  
  1567. ------- End of Forwarded Messages
  1568.  
  1569. -------------------- Bug No 17 --------------------------
  1570. Return-Path: <c.robbins@uk.co.xtel>
  1571. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  1572.           id <09254-0@lancaster.xtel.co.uk>; Wed, 3 Apr 1991 09:49:47 +0100
  1573. To: quipu-bugs@xtel.co.uk
  1574. Subject: dish on HP-UX
  1575. Date: Wed, 03 Apr 91 09:51:10 +0100
  1576. From: Colin Robbins <c.robbins@xtel.co.uk>
  1577.  
  1578. QUIPU VERSION:    6.8
  1579.  
  1580. ISODE VERSION:    6.8
  1581.  
  1582. MACHINE:    HP
  1583.  
  1584. O/S:        HP-UX
  1585.  
  1586. PROGRAM:    little dish binaries
  1587.  
  1588. SYNOPSIS:    There is a problem with building
  1589.         others/quipu/uips/dish under HP-UX
  1590.  
  1591. DESCRIPTION:
  1592.  
  1593. REPEAT BY:
  1594.  
  1595. SAMPLE FIX:
  1596.  
  1597. *** /tmp/,RCSt1a17674    Wed Mar 27 17:43:13 1991
  1598. --- others/quipu/uips/dish/quipurc.c    Wed Mar 27 17:23:07 1991
  1599. ***************
  1600. *** 183,188
  1601.       Local[0] = 0;
  1602.   
  1603.       (void) stat(tailor_file, &buf) ;
  1604.       (void) seteuid(buf.st_uid) ;    /* set effective to enable */
  1605.                       /* us to read protected file */
  1606.   
  1607.  
  1608. --- 183,189 -----
  1609.       Local[0] = 0;
  1610.   
  1611.       (void) stat(tailor_file, &buf) ;
  1612. + #ifndef HPUX
  1613.       (void) seteuid(buf.st_uid) ;    /* set effective to enable */
  1614.                       /* us to read protected file */
  1615.   #else
  1616. ***************
  1617. *** 185,190
  1618.       (void) stat(tailor_file, &buf) ;
  1619.       (void) seteuid(buf.st_uid) ;    /* set effective to enable */
  1620.                       /* us to read protected file */
  1621.   
  1622.       if ((fp_tailor = fopen(tailor_file, "r")) == 0)
  1623.       {
  1624.  
  1625. --- 186,195 -----
  1626.   #ifndef HPUX
  1627.       (void) seteuid(buf.st_uid) ;    /* set effective to enable */
  1628.                       /* us to read protected file */
  1629. + #else
  1630. +     (void) setresuid(-1, buf.st_uid, -1) ; /* set effective to enable */
  1631. +                 /* us to read protected file */
  1632. + #endif
  1633.   
  1634.       if ((fp_tailor = fopen(tailor_file, "r")) == 0)
  1635.       {
  1636. ***************
  1637. *** 552,557
  1638.    */
  1639.       (void) ds_unbind() ;
  1640.       (void) unlink(tmpdraft) ;
  1641.   }
  1642.   
  1643.   void
  1644.  
  1645. --- 557,564 -----
  1646.    */
  1647.       (void) ds_unbind() ;
  1648.       (void) unlink(tmpdraft) ;
  1649. + 
  1650. +     return(0);
  1651.   }
  1652.   
  1653.   void
  1654.  
  1655. ORIGINAL REPORT:
  1656.  
  1657. ------- Forwarded Message
  1658.  
  1659. Subject: others/quipu/uips/dish fix
  1660. Reported-On: Wed, 27 Mar 91 17:46:46 -0800
  1661. Reported-By: Norman Kincl <kincl@iag.hp.com>
  1662. Reported-To: wpp-camayocs@nisc.psi.net
  1663.  
  1664. There is a problem with building others/quipu/uips/dish under HP-UX (and
  1665. probably other SYS5 systems).  The file quipurc.c needs the following changes:
  1666.  
  1667. *** CJR ***
  1668. official fix above
  1669. ***********
  1670. ------- End of Forwarded Message
  1671.  
  1672. -------------------- Bug No 18 --------------------------
  1673. Return-Path: <c.robbins@uk.co.xtel>
  1674. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  1675.           id <09316-0@lancaster.xtel.co.uk>; Wed, 3 Apr 1991 09:55:10 +0100
  1676. To: quipu-bugs@xtel.co.uk
  1677. Subject: removeing TURBO_AVL
  1678. Date: Wed, 03 Apr 91 09:56:34 +0100
  1679. From: Colin Robbins <c.robbins@xtel.co.uk>
  1680.  
  1681. QUIPU VERSION:    6.8
  1682.  
  1683. ISODE VERSION:    6.8
  1684.  
  1685. MACHINE:    Sun 4/330 (X-TEL config)
  1686.  
  1687. O/S:        SunOS 4.1
  1688.  
  1689. PROGRAM:    ros.quipu
  1690.  
  1691. SYNOPSIS:    Can't compile if TURBO_AVL is not defined
  1692.  
  1693. DESCRIPTION:
  1694.  
  1695. REPEAT BY:
  1696.  
  1697. SAMPLE FIX:
  1698.  
  1699. *** quipu/_ds_remove.c    Mon Apr  1 12:07:32 1991
  1700. --- quipu/ds_remove.c    Mon Apr  1 12:08:38 1991
  1701. ***************
  1702. *** 178,184 ****
  1703.           {
  1704.           DN      save_dn ;
  1705.           char   *filename ;
  1706. !         Entry   empty_entry = get_default_entry (NULLENTRY) ;
  1707.           char   *dn2edbfile() ;
  1708.   
  1709.           empty_entry->e_data = E_DATA_MASTER ;
  1710. --- 178,184 ----
  1711.           {
  1712.           DN      save_dn ;
  1713.           char   *filename ;
  1714. !         Entry   empty_entry = get_default_entry (entryptr->e_parent) ;
  1715.           char   *dn2edbfile() ;
  1716.   
  1717.           empty_entry->e_data = E_DATA_MASTER ;
  1718. *** quipu/_turbo_disk.c    Mon Apr  1 12:48:45 1991
  1719. --- quipu/turbo_disk.c    Mon Apr  1 12:48:56 1991
  1720. ***************
  1721. *** 218,224 ****
  1722.       save_heap = mem_heap;
  1723.       GENERAL_HEAP;
  1724.   
  1725. !     if ( (db = turbo_open(e->e_parent, 0)) == NULL ) {
  1726.           mem_heap = save_heap;
  1727.           return(NOTOK);
  1728.       }
  1729. --- 218,224 ----
  1730.       save_heap = mem_heap;
  1731.       GENERAL_HEAP;
  1732.   
  1733. !     if ( (db = turbo_open(e->e_parent, 1)) == NULL ) {
  1734.           mem_heap = save_heap;
  1735.           return(NOTOK);
  1736.       }
  1737. *** quipu/_turbo_disk.c    Tue Apr  2 17:20:37 1991
  1738. --- quipu/turbo_disk.c    Tue Apr  2 17:22:53 1991
  1739. ***************
  1740. *** 54,62 ****
  1741.    * otherwise it will and a backup of the old one will be made.
  1742.    */
  1743.   
  1744. ! static GDBM_FILE turbo_open(parent, create)
  1745.   Entry    parent;
  1746. ! char    create;
  1747.   {
  1748.       GDBM_FILE    db;
  1749.       DN        dn, get_copy_dn();
  1750. --- 54,63 ----
  1751.    * otherwise it will and a backup of the old one will be made.
  1752.    */
  1753.   
  1754. ! static GDBM_FILE turbo_open(parent, create, backup)
  1755.   Entry    parent;
  1756. ! int    create;
  1757. ! int    backup;
  1758.   {
  1759.       GDBM_FILE    db;
  1760.       DN        dn, get_copy_dn();
  1761. ***************
  1762. *** 80,91 ****
  1763.   
  1764.       /* try to open it */
  1765.       if ( create ) {
  1766. !         /* first make a backup of the old one */
  1767. !         (void) unlink(bakname);
  1768. !         if ( link(turbo_gfname, bakname) != 0 )
  1769. !             LLOG (log_dsap, LLOG_EXCEPTIONS, 
  1770. !                 ("turbo: could not make backup"));
  1771. !         (void) unlink(turbo_gfname);
  1772.   
  1773.           /* then open the new one */
  1774.           db = gdbm_open(turbo_gfname, 0, GDBM_WRCREAT, 0600, 0);
  1775. --- 81,94 ----
  1776.   
  1777.       /* try to open it */
  1778.       if ( create ) {
  1779. !         if ( backup ) {
  1780. !             /* first make a backup of the old one */
  1781. !             (void) unlink(bakname);
  1782. !             if ( link(turbo_gfname, bakname) != 0 )
  1783. !                 LLOG (log_dsap, LLOG_EXCEPTIONS, 
  1784. !                     ("turbo: could not make backup"));
  1785. !             (void) unlink(turbo_gfname);
  1786. !         }
  1787.   
  1788.           /* then open the new one */
  1789.           db = gdbm_open(turbo_gfname, 0, GDBM_WRCREAT, 0600, 0);
  1790. ***************
  1791. *** 176,182 ****
  1792.       save_heap = mem_heap;
  1793.       GENERAL_HEAP;
  1794.   
  1795. !     if ((db = turbo_open(e, 1)) == NULL) {
  1796.           mem_heap = save_heap;
  1797.           return(NOTOK);
  1798.       }
  1799. --- 179,185 ----
  1800.       save_heap = mem_heap;
  1801.       GENERAL_HEAP;
  1802.   
  1803. !     if ((db = turbo_open(e, 1, 1)) == NULL) {
  1804.           mem_heap = save_heap;
  1805.           return(NOTOK);
  1806.       }
  1807. ***************
  1808. *** 218,224 ****
  1809.       save_heap = mem_heap;
  1810.       GENERAL_HEAP;
  1811.   
  1812. !     if ( (db = turbo_open(e->e_parent, 1)) == NULL ) {
  1813.           mem_heap = save_heap;
  1814.           return(NOTOK);
  1815.       }
  1816. --- 221,227 ----
  1817.       save_heap = mem_heap;
  1818.       GENERAL_HEAP;
  1819.   
  1820. !     if ( (db = turbo_open(e->e_parent, 1, 0)) == NULL ) {
  1821.           mem_heap = save_heap;
  1822.           return(NOTOK);
  1823.       }
  1824. ***************
  1825. *** 260,266 ****
  1826.       save_heap = mem_heap;
  1827.       GENERAL_HEAP;
  1828.   
  1829. !     if ( (db = turbo_open(e->e_parent, 0)) == NULL ) {
  1830.           mem_heap = save_heap;
  1831.           return(NOTOK);
  1832.       }
  1833. --- 263,269 ----
  1834.       save_heap = mem_heap;
  1835.       GENERAL_HEAP;
  1836.   
  1837. !     if ( (db = turbo_open(e->e_parent, 0, 0)) == NULL ) {
  1838.           mem_heap = save_heap;
  1839.           return(NOTOK);
  1840.       }
  1841.  
  1842.  
  1843. ORIGINAL REPORT:
  1844.  
  1845. ------- Forwarded Message
  1846.  
  1847. Reported-On: Sun, 31 Mar 91 21:29:35 -0800
  1848. Reported-By: clarity!bluenotes.clarity.com!bruceb@fernwood.mpk.ca.us (Bruce Bli
  1849.       nn)
  1850.  
  1851. I have installed the new Quipu 6.8 on my system and found a problem when
  1852. trying to delete the last entry from a node (this used to in an unwilling
  1853. to perform error).  The DSA gets a segmentation violation in the procedure
  1854. entry_block_print when it tries to dereference block->e_parent->e_children
  1855. since block->e_parent is NULL.
  1856.  
  1857. I tried to recompile with TURBO_AVL undefined, but then the following
  1858. files did not compile:
  1859.  
  1860.     dsap/x500as/asn_ext.c
  1861.     quipu/ds_modify.c
  1862.     quipu/turbo_debug.c
  1863.  
  1864. and entry_cmp() was undefined.  I fixed all these, but got yet another
  1865. segmentation violation from somewhere in entry_load.c and decided to abandon
  1866. this approach.
  1867.  
  1868. I changed the if statement in entry_block_print to explicitly look for
  1869. block->e_parent != NULL, and this seems to work fine.  Is this causing or
  1870. masking any other problems?  Is there a better solution?
  1871.  
  1872. Thanx
  1873. Bruce Blinn
  1874. bruceb@clarity.com
  1875.  
  1876.  
  1877. ------- End of Forwarded Message
  1878.  
  1879. -------------------- Bug No 19 --------------------------
  1880. Return-Path: <c.robbins@uk.co.xtel>
  1881. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  1882.           id <12133-0@lancaster.xtel.co.uk>; Wed, 3 Apr 1991 11:23:26 +0100
  1883. To: quipu-bugs@xtel.co.uk
  1884. Subject: DSA.pseudo
  1885. Date: Wed, 03 Apr 91 11:24:52 +0100
  1886. From: Colin Robbins <c.robbins@xtel.co.uk>
  1887.  
  1888. QUIPU VERSION:    6.8
  1889.  
  1890. ISODE VERSION:    6.8
  1891.  
  1892. MACHINE:    Sun 4/330 (X-TEL config)
  1893.  
  1894. O/S:        SunOS 4.1
  1895.  
  1896. PROGRAM:    ros.quipu
  1897.  
  1898. SYNOPSIS:    If DSA.real file is missing, DSA may core dump.
  1899.  
  1900. DESCRIPTION:
  1901.  
  1902. REPEAT BY:
  1903.  
  1904. SAMPLE FIX:
  1905.  
  1906. *** quipu/_pseudo.c    Wed Apr  3 11:14:23 1991
  1907. --- quipu/pseudo.c    Wed Apr  3 11:14:56 1991
  1908. ***************
  1909. *** 270,276 ****
  1910.           if ((dsa_real_attr = get_attributes (fptr)) == NULLATTR)
  1911.   #endif
  1912.               LLOG (log_dsap,LLOG_TRACE,("Error in DSA real entry: \"%s\" (%d)",filename,errno));
  1913.       }
  1914.   
  1915. -     (void) fclose (fptr);
  1916.   }
  1917. --- 270,277 ----
  1918.           if ((dsa_real_attr = get_attributes (fptr)) == NULLATTR)
  1919.   #endif
  1920.               LLOG (log_dsap,LLOG_TRACE,("Error in DSA real entry: \"%s\" (%d)",filename,errno));
  1921. + 
  1922. +         (void) fclose (fptr);
  1923.       }
  1924.   
  1925.   }
  1926.  
  1927. ORIGINAL REPORT:
  1928.  
  1929. ------- Forwarded Message
  1930.  
  1931. Subject: Missing DSA.real and DSA.pseudo files
  1932. Reported-On: Tue, 27 Mar 90 00:27:35 -0600
  1933. Reported-By: kiran@konark.lkg.dec.com (Kiran Somalwar)
  1934. Reported-To: bug-isode@nisc.psi.net
  1935.  
  1936.  
  1937. I am in section 2.7.4 of the white pages administrator guide for testing
  1938. the stand-alone DSA when this error happens:
  1939.  
  1940. On giving the command
  1941.  ros.quipu -t ./quiputailor
  1942. the error is
  1943. Bus error (core dumped) There are no files named DSA.real and DSA.pseudo in the
  1944.  current
  1945. directory.
  1946.  
  1947. ( *** CJR: logging info deleted *** )
  1948.  
  1949. ------- End of Forwarded Message
  1950.  
  1951. -------------------- Bug No 20 --------------------------
  1952. Return-Path: <c.robbins@uk.co.xtel>
  1953. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  1954.           id <16476-0@lancaster.xtel.co.uk>; Wed, 3 Apr 1991 16:18:04 +0100
  1955. To: quipu-bugs@xtel.co.uk
  1956. Subject: installing dsap lint lib
  1957. Date: Wed, 03 Apr 91 16:19:31 +0100
  1958. From: Colin Robbins <c.robbins@xtel.co.uk>
  1959.  
  1960. QUIPU VERSION:    6.8
  1961.  
  1962. ISODE VERSION:    6.8
  1963.  
  1964. MACHINE:    Sun 4/330 (X-TEL config)
  1965.  
  1966. O/S:        SunOS 4.1
  1967.  
  1968. PROGRAM:    libdsap
  1969.  
  1970. SYNOPSIS:    You get a large number of errors when installing
  1971.         the libdsap lint library
  1972.  
  1973. DESCRIPTION:
  1974.  
  1975. REPEAT BY:
  1976.  
  1977. SAMPLE FIX:
  1978.  
  1979. *** dsap/_Makefile    Wed Apr  3 11:55:11 1991
  1980. --- dsap/Makefile    Wed Apr  3 11:57:25 1991
  1981. ***************
  1982. *** 111,117 ****
  1983.               < llib-ldsap | \
  1984.               sed -e 's%#include "$(INCDIR)quipu/\([A-Z].*\)"%#include "$(INCDIR)pepsy/\1"%' | \
  1985.               sed -e 's%#include "/usr/include/\(.*\)"%#include <\1>%' > $@
  1986. !         @$(UTILDIR)inst-lint.sh $(SYSTEM) -I$(INCDIRM) $(OPTIONS) $@
  1987.           -@ls -gls $@ $@.ln
  1988.           -@echo ""
  1989.   
  1990. --- 111,117 ----
  1991.               < llib-ldsap | \
  1992.               sed -e 's%#include "$(INCDIR)quipu/\([A-Z].*\)"%#include "$(INCDIR)pepsy/\1"%' | \
  1993.               sed -e 's%#include "/usr/include/\(.*\)"%#include <\1>%' > $@
  1994. !         @$(UTILDIR)inst-lint.sh $(SYSTEM) -I$(INCDIR).. $(OPTIONS) $@
  1995.           -@ls -gls $@ $@.ln
  1996.           -@echo ""
  1997.   
  1998.  
  1999. ORIGINAL REPORT:
  2000.          various.
  2001. -------------------- Bug No 21 --------------------------
  2002. Return-Path: <c.robbins@uk.co.xtel>
  2003. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  2004.           id <16514-0@lancaster.xtel.co.uk>; Wed, 3 Apr 1991 16:22:08 +0100
  2005. To: quipu-bugs@xtel.co.uk
  2006. Subject: duplicates in oidtables
  2007. Date: Wed, 03 Apr 91 16:23:35 +0100
  2008. From: Colin Robbins <c.robbins@xtel.co.uk>
  2009.  
  2010. QUIPU VERSION:    6.8
  2011.  
  2012. ISODE VERSION:    6.8
  2013.  
  2014. MACHINE:    Sun 4/330 (X-TEL config)
  2015.  
  2016. O/S:        SunOS 4.1
  2017.  
  2018. PROGRAM:    all QUIPU binaries
  2019.  
  2020. SYNOPSIS:    Duplicat entries in the oidtables are not trapped
  2021.  
  2022. DESCRIPTION:
  2023.  
  2024. REPEAT BY:
  2025.  
  2026. SAMPLE FIX:
  2027. *** dsap/common/_oid.c    Wed Apr  3 15:05:32 1991
  2028. --- dsap/common/oid.c    Wed Apr  3 15:32:31 1991
  2029. ***************
  2030. *** 127,133 ****
  2031.       while (1) {     /* break out */
  2032.           if ( (name = get_entry ()) == NULLCP)
  2033.               break;
  2034. !         add_entry (name,GEN);
  2035.       }
  2036.       (void) fclose (f_table);
  2037.   
  2038. --- 127,134 ----
  2039.       while (1) {     /* break out */
  2040.           if ( (name = get_entry ()) == NULLCP)
  2041.               break;
  2042. !         if (! add_entry (name,GEN))
  2043. !             fatal (-91,"Can't load oidtable.gen");
  2044.       }
  2045.       (void) fclose (f_table);
  2046.   
  2047. ***************
  2048. *** 140,146 ****
  2049.       while (1) {     /* break out */
  2050.           if ( (name = get_entry ()) == NULLCP)
  2051.               break;
  2052. !         add_entry (name,ATTR);
  2053.       }
  2054.       (void) fclose (f_table);
  2055.   
  2056. --- 141,148 ----
  2057.       while (1) {     /* break out */
  2058.           if ( (name = get_entry ()) == NULLCP)
  2059.               break;
  2060. !         if (!add_entry (name,ATTR))
  2061. !             fatal (-92,"Can't load oidtable.at");
  2062.       }
  2063.       (void) fclose (f_table);
  2064.   
  2065. ***************
  2066. *** 153,159 ****
  2067.       while (1) {     /* break out */
  2068.           if ( (name = get_entry ()) == NULLCP)
  2069.               break;
  2070. !         add_entry (name,OC);
  2071.       }
  2072.       (void) fclose (f_table);
  2073.   
  2074. --- 155,162 ----
  2075.       while (1) {     /* break out */
  2076.           if ( (name = get_entry ()) == NULLCP)
  2077.               break;
  2078. !         if (!add_entry (name,OC))
  2079. !             fatal (-93,"Can't load oidtable.oc");
  2080.       }
  2081.       (void) fclose (f_table);
  2082.   
  2083. ***************
  2084. *** 168,177 ****
  2085.       int        i;
  2086.       register struct pair *p;
  2087.   
  2088.       if ((p = (struct pair *) calloc (1, sizeof *p)) == NULL) {
  2089.       SLOG (log_dsap, LLOG_EXCEPTIONS, NULLCP,
  2090. !           ("calloc of alias structure failed"));
  2091. !     return;
  2092.       }
  2093.   
  2094.       p -> p_name = a;
  2095. --- 171,190 ----
  2096.       int        i;
  2097.       register struct pair *p;
  2098.   
  2099. +     for (p = Pbuckets[PHASH (a)];
  2100. +     p && lexequ (p -> p_name, a);
  2101. +     p = p -> p_chain) 
  2102. +         ; /* NO-OP */
  2103. + 
  2104. +     if ( p ) {
  2105. +     LLOG (log_dsap,LLOG_FATAL,("duplicate OID '%s'",a));
  2106. +     return FALSE;
  2107. +     }
  2108. + 
  2109.       if ((p = (struct pair *) calloc (1, sizeof *p)) == NULL) {
  2110.       SLOG (log_dsap, LLOG_EXCEPTIONS, NULLCP,
  2111. !           ("calloc of oid hash structure failed"));
  2112. !     return FALSE;
  2113.       }
  2114.   
  2115.       p -> p_name = a;
  2116. ***************
  2117. *** 181,190 ****
  2118.       Pbuckets[i] = p;
  2119.   
  2120.       if (d != NULLCP) {
  2121.       if ((p = (struct pair *) calloc (1, sizeof *p)) == NULL) {
  2122.           SLOG (log_dsap, LLOG_EXCEPTIONS, NULLCP,
  2123. !                         ("calloc of alias (2) structure failed"));
  2124. !         return;
  2125.           }
  2126.   
  2127.       Palias[Palias_next].a_full = a;
  2128. --- 194,213 ----
  2129.       Pbuckets[i] = p;
  2130.   
  2131.       if (d != NULLCP) {
  2132. +     for (p = Pbuckets[PHASH (d)];
  2133. +          p && lexequ (p -> p_name, d);
  2134. +          p = p -> p_chain) 
  2135. +         ; /* NO-OP */
  2136. + 
  2137. +     if ( p ) {
  2138. +         LLOG (log_dsap,LLOG_FATAL,("duplicate alias OID '%s'",d));
  2139. +         return FALSE;
  2140. +     }
  2141. + 
  2142.       if ((p = (struct pair *) calloc (1, sizeof *p)) == NULL) {
  2143.           SLOG (log_dsap, LLOG_EXCEPTIONS, NULLCP,
  2144. !                         ("calloc of alias hash structure failed"));
  2145. !         return FALSE;
  2146.           }
  2147.   
  2148.       Palias[Palias_next].a_full = a;
  2149. ***************
  2150. *** 197,202 ****
  2151. --- 220,226 ----
  2152.           Pbuckets[i] = p;
  2153.       }
  2154.   
  2155. +     return TRUE;
  2156.   }
  2157.   
  2158.   
  2159. ***************
  2160. *** 211,217 ****
  2161.   
  2162.       if ((nptr = index (newname,SEPERATOR)) == 0) {
  2163.           LLOG (log_dsap,LLOG_FATAL,("oid missing in %s",newname));
  2164. !         return;
  2165.       }
  2166.       *nptr = 0;
  2167.       if ((sep = index (newname,COMMA)) != 0) {
  2168. --- 235,241 ----
  2169.   
  2170.       if ((nptr = index (newname,SEPERATOR)) == 0) {
  2171.           LLOG (log_dsap,LLOG_FATAL,("oid missing in %s",newname));
  2172. !         return FALSE;
  2173.       }
  2174.       *nptr = 0;
  2175.       if ((sep = index (newname,COMMA)) != 0) {
  2176. ***************
  2177. *** 224,240 ****
  2178.           case GEN:
  2179.               Current = &OIDTable[NumEntries];
  2180.               Current->ot_name = strdup(newname);
  2181. !             add_entry_aux (Current->ot_name,(caddr_t)&OIDTable[NumEntries],GEN,alias);
  2182.               break;
  2183.           case ATTR:
  2184.               Current = &attrOIDTable[attrNumEntries].oa_ot;
  2185.               Current->ot_name = strdup(newname);
  2186. !             add_entry_aux (Current->ot_name,(caddr_t)&attrOIDTable[attrNumEntries],ATTR,alias);
  2187.               break;
  2188.           case OC:
  2189.               Current = &ocOIDTable[ocNumEntries].oc_ot;
  2190.               Current->ot_name = strdup(newname);
  2191. !             add_entry_aux (Current->ot_name,(caddr_t)&ocOIDTable[ocNumEntries],OC,alias);
  2192.               break;
  2193.           }
  2194.       *nptr = SEPERATOR;
  2195. --- 248,267 ----
  2196.           case GEN:
  2197.               Current = &OIDTable[NumEntries];
  2198.               Current->ot_name = strdup(newname);
  2199. !             if (!add_entry_aux (Current->ot_name,(caddr_t)&OIDTable[NumEntries],GEN,alias))
  2200. !                 return FALSE;
  2201.               break;
  2202.           case ATTR:
  2203.               Current = &attrOIDTable[attrNumEntries].oa_ot;
  2204.               Current->ot_name = strdup(newname);
  2205. !             if (!add_entry_aux (Current->ot_name,(caddr_t)&attrOIDTable[attrNumEntries],ATTR,alias))
  2206. !                 return FALSE;
  2207.               break;
  2208.           case OC:
  2209.               Current = &ocOIDTable[ocNumEntries].oc_ot;
  2210.               Current->ot_name = strdup(newname);
  2211. !             if (!add_entry_aux (Current->ot_name,(caddr_t)&ocOIDTable[ocNumEntries],OC,alias))
  2212. !                 return FALSE;
  2213.               break;
  2214.           }
  2215.       *nptr = SEPERATOR;
  2216. ***************
  2217. *** 248,254 ****
  2218.           *ptr++ = 0;
  2219.           if (( p = get_oid (ptr)) == NULLCP) {
  2220.               LLOG (log_dsap,LLOG_FATAL,("invalid alias oid '%s'",ptr));
  2221. !             return;
  2222.           }
  2223.           if ((oid = str2oid (p)) == NULLOID)
  2224.               Current->ot_aliasoid = NULLOID;
  2225. --- 275,281 ----
  2226.           *ptr++ = 0;
  2227.           if (( p = get_oid (ptr)) == NULLCP) {
  2228.               LLOG (log_dsap,LLOG_FATAL,("invalid alias oid '%s'",ptr));
  2229. !             return FALSE;
  2230.           }
  2231.           if ((oid = str2oid (p)) == NULLOID)
  2232.               Current->ot_aliasoid = NULLOID;
  2233. ***************
  2234. *** 258,264 ****
  2235.       ptr = get_oid (nptr);
  2236.       if (ptr == NULLCP) {
  2237.           LLOG (log_dsap,LLOG_FATAL,("invalid oid '%s'",nptr));
  2238. !         return;
  2239.       }
  2240.       Current->ot_stroid = strdup(ptr);
  2241.   
  2242. --- 285,291 ----
  2243.       ptr = get_oid (nptr);
  2244.       if (ptr == NULLCP) {
  2245.           LLOG (log_dsap,LLOG_FATAL,("invalid oid '%s'",nptr));
  2246. !         return FALSE;
  2247.       }
  2248.       Current->ot_stroid = strdup(ptr);
  2249.   
  2250. ***************
  2251. *** 275,288 ****
  2252.               NumEntries++;   /* nothing else to do */
  2253.               break;
  2254.           case ATTR:
  2255. !             if (sep == 0)
  2256.                   LLOG (log_dsap,LLOG_FATAL,("syntax missing in %s",newname));
  2257. !             else {
  2258.                   if (( ptr = index (sep,SEPERATOR)) != NULLCP) {
  2259.                       *ptr++ = 0;
  2260. !                     if (lexequ (ptr,"FILE") != 0)
  2261.                           LLOG (log_dsap,LLOG_FATAL,("FILE syntax expected, '%s' found",ptr));
  2262. !                     else {
  2263.                           attrOIDTable[attrNumEntries].oa_syntax = str2syntax(sep);
  2264.                           attrOIDTable[attrNumEntries].oa_syntax += AV_WRITE_FILE;
  2265.                           attrNumEntries++;
  2266. --- 302,317 ----
  2267.               NumEntries++;   /* nothing else to do */
  2268.               break;
  2269.           case ATTR:
  2270. !             if (sep == 0) {
  2271.                   LLOG (log_dsap,LLOG_FATAL,("syntax missing in %s",newname));
  2272. !                 return FALSE;
  2273. !             } else {
  2274.                   if (( ptr = index (sep,SEPERATOR)) != NULLCP) {
  2275.                       *ptr++ = 0;
  2276. !                     if (lexequ (ptr,"FILE") != 0) {
  2277.                           LLOG (log_dsap,LLOG_FATAL,("FILE syntax expected, '%s' found",ptr));
  2278. !                         return FALSE;
  2279. !                     } else {
  2280.                           attrOIDTable[attrNumEntries].oa_syntax = str2syntax(sep);
  2281.                           attrOIDTable[attrNumEntries].oa_syntax += AV_WRITE_FILE;
  2282.                           attrNumEntries++;
  2283. ***************
  2284. *** 301,307 ****
  2285.               else
  2286.                   ocNumEntries++;
  2287.       }
  2288. !     return;
  2289.   }
  2290.   
  2291.   char * get_oid (str)
  2292. --- 330,336 ----
  2293.               else
  2294.                   ocNumEntries++;
  2295.       }
  2296. !     return TRUE;
  2297.   }
  2298.   
  2299.   char * get_oid (str)
  2300.  
  2301. ORIGINAL REPORT:
  2302.      C Robbins
  2303. -------------------- Bug No 22 --------------------------
  2304. Return-Path: <c.robbins@uk.co.xtel>
  2305. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  2306.           id <16528-0@lancaster.xtel.co.uk>; Wed, 3 Apr 1991 16:23:58 +0100
  2307. To: quipu-bugs@xtel.co.uk
  2308. Subject: null attrs in RDNS
  2309. Date: Wed, 03 Apr 91 16:25:25 +0100
  2310. From: Colin Robbins <c.robbins@xtel.co.uk>
  2311.  
  2312. QUIPU VERSION:    6.8
  2313.  
  2314. ISODE VERSION:    6.8
  2315.  
  2316. MACHINE:    Sun 4/330 (X-TEL config)
  2317.  
  2318. O/S:        SunOS 4.1
  2319.  
  2320. PROGRAM:    various QUIPU
  2321.  
  2322. SYNOPSIS:    It is possible to create an RDN without a value in
  2323.         some circumstances.
  2324.  
  2325. DESCRIPTION:
  2326.         
  2327. REPEAT BY:
  2328.  
  2329. SAMPLE FIX:
  2330.  
  2331. *** dsap/common/_rdn_str.c    Wed Apr  3 16:05:52 1991
  2332. --- dsap/common/rdn_str.c    Wed Apr  3 16:08:00 1991
  2333. ***************
  2334. *** 37,42 ****
  2335. --- 37,48 ----
  2336.           return (NULLRDN);
  2337.       }
  2338.   
  2339. +     if (*ptr == 0) {
  2340. +         *save = val;
  2341. +         parse_error ("Attribute Value missing in RDN '%s'",str);
  2342. +         return (NULLRDN);
  2343. +     }
  2344. + 
  2345.       rdn = rdn_comp_alloc();
  2346.       rdn->rdn_next = NULLRDN;
  2347.       rdn->rdn_at = at;
  2348.  
  2349. ORIGINAL REPORT:
  2350. -------------------- Bug No 23 --------------------------
  2351. Return-Path: <c.robbins@uk.co.xtel>
  2352. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  2353.           id <04224-0@lancaster.xtel.co.uk>; Fri, 19 Apr 1991 11:19:56 +0100
  2354. To: quipu-bugs@xtel.co.uk
  2355. Subject: modify -remove
  2356. Date: Fri, 19 Apr 91 11:16:48 +0100
  2357. From: Colin Robbins <c.robbins@xtel.co.uk>
  2358.  
  2359. QUIPU VERSION:    6.8
  2360.  
  2361. ISODE VERSION:    6.8
  2362.  
  2363. MACHINE:    Sun 4/330 (X-TEL config)
  2364.  
  2365. O/S:        SunOS 4.1
  2366.  
  2367. PROGRAM:    dish
  2368.  
  2369. SYNOPSIS:    problem removing attributes with the '-remove' flag
  2370.  
  2371. DESCRIPTION:    If there are multiple values for the attributes, a
  2372.         remove attempt sometimes failes.
  2373.  
  2374. REPEAT BY:
  2375.  
  2376. SAMPLE FIX:
  2377.  
  2378. *** quipu/dish/_modify.c    Fri Apr 19 11:15:04 1991
  2379. --- quipu/dish/modify.c    Fri Apr 19 10:44:50 1991
  2380. ***************
  2381. *** 214,220 ****
  2382.   
  2383.       if (start != 0)
  2384.       {
  2385. !             if (build_modify(start, &mod_arg) == NOTOK)
  2386.           {
  2387.               return ;
  2388.           }
  2389. --- 214,220 ----
  2390.   
  2391.       if (start != 0)
  2392.       {
  2393. !         if (build_modify(start, &mod_arg) == NOTOK)
  2394.           {
  2395.               return ;
  2396.           }
  2397. ***************
  2398. *** 698,709 ****
  2399.   struct    entrymod    *emnew ;
  2400.       AttributeType    a_t ;
  2401.       AttributeValue    new_AV ;
  2402. !     AV_Sequence    new_avs ;
  2403.       Attr_Sequence    eptr ;
  2404.   
  2405.       char   *ptr ;
  2406.       char   *str_attr_type = NULLCP ;
  2407.       char   *str_attr_val = NULLCP ;
  2408.   
  2409.       while (start)
  2410.       {
  2411. --- 698,711 ----
  2412.   struct    entrymod    *emnew ;
  2413.       AttributeType    a_t ;
  2414.       AttributeValue    new_AV ;
  2415. !     AV_Sequence    new_avs, tmp_avs ;
  2416.       Attr_Sequence    eptr ;
  2417.   
  2418.       char   *ptr ;
  2419.       char   *str_attr_type = NULLCP ;
  2420.       char   *str_attr_val = NULLCP ;
  2421. +     int    num_attr_vals = 0 ;
  2422. +     int    attr_val_match = 0 ;
  2423.   
  2424.       while (start)
  2425.       {
  2426. ***************
  2427. *** 773,789 ****
  2428.                   }
  2429.                   else
  2430.                   {
  2431. !                    if (eptr->attr_value && 
  2432. !                    AttrV_cmp(new_AV, &(eptr->attr_value->avseq_av)) == OK)
  2433. !                    {
  2434. !                       if (eptr->attr_value->avseq_next == NULLAV)
  2435. !                      emnew->em_type = EM_REMOVEATTRIBUTE ;
  2436. !                       else
  2437. !                      emnew->em_type = EM_REMOVEVALUES ;
  2438.                      }
  2439.                      else
  2440.                      {
  2441.                     ps_printf(OPT, "Can't remove value that is not present.\n") ;
  2442.                      }
  2443.                   }
  2444.                }
  2445. --- 775,800 ----
  2446.                   }
  2447.                   else
  2448.                   {
  2449. !                    num_attr_vals = 0 ;
  2450. !                    attr_val_match = 0 ;
  2451. ! 
  2452. !                    for (tmp_avs = eptr->attr_value; tmp_avs != NULLAV; 
  2453. !                     tmp_avs = tmp_avs->avseq_next)
  2454. !                    {                   
  2455. !                   if (AttrV_cmp(new_AV, &(tmp_avs->avseq_av)) == OK)
  2456. !                       {
  2457. !                      attr_val_match = 1 ;
  2458. !                   }
  2459. !                   num_attr_vals++ ;
  2460.                      }
  2461. +                    if (num_attr_vals == 1)
  2462. +                       emnew->em_type = EM_REMOVEATTRIBUTE ;
  2463.                      else
  2464. +                    emnew->em_type = EM_REMOVEVALUES ;
  2465. +                    if (attr_val_match == 0)
  2466.                      {
  2467.                     ps_printf(OPT, "Can't remove value that is not present.\n") ;
  2468. +                   return (NOTOK) ;
  2469.                      }
  2470.                   }
  2471.                }
  2472.  
  2473. ORIGINAL REPORT:     Mark Knopper to wpp-camayocs
  2474.  
  2475. -------------------- Bug No 24 --------------------------
  2476. Return-Path: <c.robbins@uk.co.xtel>
  2477. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  2478.           id <17685-0@lancaster.xtel.co.uk>; Wed, 1 May 1991 12:32:15 +0100
  2479. To: quipu-bugs@xtel.co.uk
  2480. Subject: Loading with EDB files missing
  2481. Date: Wed, 01 May 91 12:32:11 +0100
  2482. From: Colin Robbins <c.robbins@xtel.co.uk>
  2483.  
  2484. QUIPU VERSION:    6.8
  2485.  
  2486. ISODE VERSION:    6.8
  2487.  
  2488. MACHINE:    Sun 4/330 (X-TEL config)
  2489.  
  2490. O/S:        SunOS 4.1
  2491.  
  2492. PROGRAM:    ros.quipu
  2493.  
  2494. SYNOPSIS:    if an EDB file was missing, sometimes the DSA would
  2495.         incorrectly load the database, thinking it had MASTER
  2496.         control of the EDB file above!
  2497.  
  2498. DESCRIPTION:
  2499.  
  2500. REPEAT BY:
  2501.  
  2502. SAMPLE FIX:
  2503.  
  2504. *** quipu/_entry_load.c    Wed May  1 12:22:58 1991
  2505. --- quipu/entry_load.c    Wed May  1 12:24:13 1991
  2506. ***************
  2507. *** 360,368 ****
  2508.           if (file_check(offset, e) == OK) {
  2509.                   if ((e->e_children = getentry_block(e, filename)) == NULLAVL) {
  2510.               if (e->e_allchildrenpresent != FALSE &&
  2511. !                 e->e_leaf == FALSE)
  2512.                   return(OK);
  2513. !             else
  2514.                   return(NOTOK) ;
  2515.           }
  2516.           if (parse_status != 0)
  2517. --- 360,370 ----
  2518.           if (file_check(offset, e) == OK) {
  2519.                   if ((e->e_children = getentry_block(e, filename)) == NULLAVL) {
  2520.               if (e->e_allchildrenpresent != FALSE &&
  2521. !                 e->e_leaf == FALSE) {
  2522. !                 e->e_allchildrenpresent = FALSE;
  2523. !                 got_all = FALSE;
  2524.                   return(OK);
  2525. !             } else
  2526.                   return(NOTOK) ;
  2527.           }
  2528.           if (parse_status != 0)
  2529. *** quipu/_shadow.c    Wed May  1 10:58:16 1991
  2530. --- quipu/shadow.c    Wed May  1 10:59:39 1991
  2531. ***************
  2532. *** 415,423 ****
  2533.       }
  2534.   
  2535.   #ifdef TURBO_AVL
  2536. - #ifdef TURBO_INDEX
  2537. -                 turbo_index_delete(eptr);
  2538. - #endif
  2539.   
  2540.                   if (unravel_attribute(ne, &err) != OK) {
  2541.               pslog (log_dsap,LLOG_EXCEPTIONS,"shadow: unravel failure",
  2542. --- 415,420 ----
  2543. ***************
  2544. *** 441,446 ****
  2545. --- 438,447 ----
  2546.               return;
  2547.           }
  2548.   
  2549. + #ifdef TURBO_INDEX
  2550. +                 turbo_index_delete(eptr);
  2551. + #endif
  2552. + 
  2553.                   if (ne->e_parent == NULLENTRY) {
  2554.                           entry_replace(database_root, ne);
  2555.                   } else {
  2556. ***************
  2557. *** 451,456 ****
  2558. --- 452,459 ----
  2559.           ne = eptr;
  2560.   
  2561.                   if (unravel_attribute(eptr, &err) != OK) {
  2562. +             pslog (log_dsap,LLOG_EXCEPTIONS,"shadow: 2nd unravel failure",
  2563. +                    dn_print, (caddr_t) dn);
  2564.               log_ds_error (&err);
  2565.               ds_error_free (&err);
  2566.               return;
  2567.  
  2568. ORIGINAL REPORT:
  2569.  
  2570.      Andrew Macpherson & Giant Tortoise!     
  2571. -------------------- Bug No 25 --------------------------
  2572. Return-Path: <c.robbins@uk.co.xtel>
  2573. Received: from spitfire by lancaster.xtel.co.uk with SMTP (PP) 
  2574.           id <00726-0@lancaster.xtel.co.uk>; Tue, 7 May 1991 11:50:25 +0100
  2575. To: quipu-bugs@xtel.co.uk
  2576. Subject: dsacontrol -refresh counting problem
  2577. Date: Tue, 07 May 91 11:50:13 +0100
  2578. From: Colin Robbins <c.robbins@xtel.co.uk>
  2579.  
  2580. QUIPU VERSION:    6.8
  2581.  
  2582. ISODE VERSION:    6.8
  2583.  
  2584. MACHINE:    Sun 4/330 (X-TEL config)
  2585.  
  2586. O/S:        SunOS 4.1
  2587.  
  2588. PROGRAM:    ros.quipu
  2589.  
  2590. SYNOPSIS:    Gets the DSA size count wrong if you use dsacontrol -refresh.
  2591.  
  2592. DESCRIPTION:    All entries ARE freed - the grow is to be expected.
  2593.  
  2594. REPEAT BY:
  2595.  
  2596. SAMPLE FIX:
  2597.  
  2598. *** quipu/_entry_load.c    Tue May  7 11:20:52 1991
  2599. --- quipu/entry_load.c    Tue May  7 11:44:22 1991
  2600. ***************
  2601. *** 702,707 ****
  2602. --- 702,765 ----
  2603.   #endif
  2604.   }
  2605.   
  2606. + static dsa_directory_free (directory)
  2607. + Entry directory;
  2608. + {
  2609. + extern Entry database_root;
  2610. + extern int local_slave_size;
  2611. + extern int slave_edbs;
  2612. + extern int local_master_size;
  2613. + extern int master_edbs;
  2614. + extern int local_cache_size;
  2615. + 
  2616. + 
  2617. +     if (directory !=  NULLENTRY) {
  2618. + 
  2619. + #ifdef TURBO_AVL
  2620. +         if (directory != database_root)
  2621. +             turbo_index_delete(directory);
  2622. + 
  2623. +         if (directory->e_children != NULLAVL) {
  2624. +             switch (directory->e_data) {
  2625. +                 case E_TYPE_SLAVE:     slave_edbs--;     break;
  2626. +                 case E_DATA_MASTER: master_edbs--;     break;
  2627. +                 default:                break;
  2628. +             }
  2629. +             (void) avl_free(directory->e_children, dsa_directory_free);
  2630. +         }
  2631. +         switch (directory->e_data) {
  2632. +             case E_TYPE_SLAVE:     local_slave_size--;     break;
  2633. +             case E_DATA_MASTER: local_master_size--;     break;
  2634. +             case E_TYPE_CACHE_FROM_MASTER: 
  2635. +                     local_cache_size--;     break;
  2636. +             default:                    break;
  2637. +         }
  2638. +         entry_free(directory);
  2639. + #else
  2640. + Entry ptr;
  2641. + Entry next;
  2642. +         switch (directory->e_data) {
  2643. +             case E_TYPE_SLAVE:     slave_edbs--;     break;
  2644. +             case E_DATA_MASTER: master_edbs--;     break;
  2645. +             default:                break;
  2646. +         }
  2647. + 
  2648. +         for ( ptr = directory; ptr !=  NULLENTRY; ptr = next ) {
  2649. +             next = ptr->e_sibling;
  2650. +             dsa_directory_free (ptr->e_child);
  2651. +             switch (ptr->e_data) {
  2652. +                 case E_TYPE_SLAVE:     local_slave_size--;     break;
  2653. +                 case E_DATA_MASTER: local_master_size--;     break;
  2654. +                 case E_TYPE_CACHE_FROM_MASTER: 
  2655. +                         local_cache_size--;     break;
  2656. +                 default:                    break;
  2657. +             }
  2658. +             entry_free (ptr);
  2659. +         }
  2660. + #endif
  2661. +     }
  2662. + }
  2663. + 
  2664.   int    refreshing;
  2665.   
  2666.   refresh_from_disk(dn)
  2667. ***************
  2668. *** 739,748 ****
  2669.   
  2670.       if (dn == NULLDN) {
  2671.           database_root = child;
  2672. !         directory_free (child);
  2673.           database_root = tmp;
  2674.       } else
  2675. !         directory_free(child);
  2676.   
  2677.       return (OK);
  2678.   }
  2679. --- 797,806 ----
  2680.   
  2681.       if (dn == NULLDN) {
  2682.           database_root = child;
  2683. !         dsa_directory_free (child);
  2684.           database_root = tmp;
  2685.       } else
  2686. !         dsa_directory_free(child);
  2687.   
  2688.       return (OK);
  2689.   }
  2690.  
  2691.  
  2692. ORIGINAL REPORT:
  2693.  
  2694. ------- Forwarded Message
  2695.  
  2696. Subject: Problems with DSA refresh
  2697. Reported-On: 06 May 91 15:13:00 -0500
  2698. Reported-By: Peter (P.W.) Whittaker <PWW@BNR.ca>
  2699. Reported-To: quipu-support@cs.ucl.ac.uk
  2700.  
  2701. Greetings, I'm concerned with the results of "dsacontrol -refresh"
  2702. operations, as initiated from dish.
  2703.  
  2704. After starting a 6.8 DSA on a Sun 4/490, "dsacontrol -info" showed
  2705. 10820 Master Entries in 20 EDB files, 753 Slave Entries in 13 EDB files,
  2706. while my process monitoring software showed DATA size at 3610 "clicks".
  2707. After two "dsacontrol -refresh" operations, these numbers had grown to
  2708. 27632 Master Entries in 45 EDBs, 767 Slave Entries in 15 EDBs, and
  2709. DATA == 6493 "clicks".  Total system swap usage rose from 34816 K to
  2710. 58520 K (QUIPU 6.8 was effectively the only process running).
  2711. ("clicks" is a Sun-ism - see sys/proc.h.  I don't know how it relates
  2712. to the real world).
  2713.  
  2714. It seems that QUIPU is not "forgetting" about the original entries
  2715. (i.e. the ones it is supposed to be refreshing).  Is there a quick-and-easy
  2716. way to patch this (I don't mind running a non-standard QUIPU - swap space
  2717. is at a premium).
  2718.  
  2719. I had observed the same behavior with 6.1, but decided to wait and see
  2720. how 6.8 behaved - it seems to behave the same way :-<.
  2721.  
  2722. Thanks for your help,
  2723.  
  2724. Peter W.
  2725.  
  2726. Peter Whittaker      [%%%%%%%%%%%%%%%%%%%%%%%%%%]   Open Systems Integration
  2727. pww@bnr.ca           [       DSA's'R'Us!        ]   Bell Northern Research
  2728. Ph: +1 613 765 2064  [                          ]   P.O. Box 3511, Station C
  2729. FAX:+1 613 763 3283  [__________________________]   Ottawa, Ontario, K1Y 4H7
  2730.  
  2731. ------- End of Forwarded Message
  2732.  
  2733.